$a=5; $b="five"; $c=5.0 #### $a="5.0"; # set up our variables $b="5"; # # to the end of a line is a comment in perl print "Are these variables equal as numbers? ",$a==$b,"\n"; print "Are the variables equal as strings? ",$a eq $b,"\n"; print "These variables are equal as strings\n" if($a eq $b); print "These variables are equal numerically\n" if($a==$b); #### @a=(1,2,3); @simpsonsfamily=("homer","marge","lisa","maggie","bart"); #### push @array, $value; #puts $value onto the end of @array. #### @array=reverse @array; #### @array=("key1","value1","key2","value2"); #an array filled with key value pairs %hash1=("key1"=>"value1","key2"=>"value2"); #one way to initialize a hash (key=>value,key2=>value2,..) %hash2=@array; #making %hash2 out of a collection of key value pairs in an array $hash3{"key1"}="value1"; #creates key of "key1" and value of "value1" $hash3{"key2"}="value2";