Select Code to Download

local our $foo = 1;
Dance();
sub Dance { 
    print "I win, $foo\n";
}

Dance( 1 );
sub Dance {
    my( $foo ) = @_;
    print "I win, $foo\n";
}