Mega Code Archive

 

Categories / Perl / Language Basics

 

Square $var

#!/usr/bin/perl $var=0;        $var **= 2;        # Square $var print "\$var squared is $var\n";