All the Perl that's Practical to Extract and Report

Why? Because I Could

DarkKnightRadick on 2003-05-25T14:25:55

#!/usr/bin/perl -w #Hard coded math action!

print 2 + 3 x 100 * 3 . "\n" . "\t" x2 . 5 * 4 x 20 . "\n"; $math = 2 + 3 x 100; $multiply = $math * 3; print $multiply . "\n" . "\t" x 2 . 5 * 4 x 20 . "\n";