Next Tricks of the Wizards 63

Magical Exporter Variable

        $salary = 43_000;
        print "After your raise, you will make $salary*1.06.\n";
         After your raise, you will make 43000*1.06.
        @s = (1, 4, 9, 16, 25, 36);
        print "$s[(2+7-1*3)/2]\n";        # Prints 16


Next Copyright © 2003 M. J. Dominus