Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -MData::Dumper -le
"my $x = '1.23' + qq{0.34 \t\n\r} + '5.6e3' + '100';
...
$VAR1 = '5800.17';

$VAR1 = '5800.17';

c:\@Work\Perl\monks>perl -wMstrict -MData::Dumper -le
"my $x = <STDIN>;
...
';

$VAR1 = '59.04';