Select Code to Download

C:\>perl -le "use strict;use warnings;sub f{my($x,$y)=@_;my $aa=$x;my 
+$bb=$y; print $aa, ' ', $bb}; f(1); f(2,3)"
Use of uninitialized value $bb in print at -e line 1.
1
2 3