Mega Code Archive

 
Categories / Perl / Language Basics
 

Assign new value to the integer scalar variable

#!/usr/bin/perl -w $a = 6 * 9; print "Six nines are ", $a, "\n"; $a = $a + 3; print "Plus three is ", $a, "\n"; $a = $a / 3; print "All over three is ", $a, "\n"; $a = $a + 1; print "Add one is ", $a, "\n";