print "\nCombined Assignment Operators\n"; $a = 47; $a += 3; # short for $a = $a + 3 $a++; # autoincrement print $a; # Prints 51