Not as you may think 2*$b||!2*$b -- that seems to have been done before. This quote is from later in the play.

#!/usr/bin/perl

0; $that{this}; 'too' x 2; $solid; $flesh='melt',
'thaw' and $self->{resolve_into}->{dew}
or 'that'; not $everlasting = 'fixed' ?
$his_cannon -= $self_slaughter : 0 . ' God' x 2;
$how; ($weary, $stale, $flat, $unprofitable)=
('seem to me',$uses_of_this_world[0..$#uses_of_this_world] );
[download]

update: messy formatting fix. oops.