Assign value to four variables
#!C:\perl\bin $age = $myage = $herage = $hisage = 25; print "\$age = $age\n\n"; print "\$myage = $myage\n\n"; print "\$herage = $herage\n\n"; print "\$hisage = $hisage\n\n";