mysub(5); sub mysub { my $val = shift || 8; print "next demo: \n"; for (1..10){ next if $_ == $val; print $_, "\n"; } print "\nreturn demo: \n"; for (1..10){ return if $_ == $val; print $_, "\n"; } }