Mega Code Archive

 

Categories / Perl / Language Basics

 

Scalar, array, and hash output

$salary=50000;                   # Scalar assignment @months=('Mar', 'Apr', 'May');   # Array assignment %states= (                       # Hash assignment        'CA' =>  'California',        'NM'  => 'New Mexico',             );              print "$salary\n"; print "@months\n"; print "$months[0], $months[1], $months[2]\n"; print "$states{'CA'}, $states{'NM'}\n"; print $x + 3, "\n";              print "***$name***\n";