use 5.010; use strict; sub my_sub { next }; for (1..5) { say "Hello"; my_sub(); say "World"; } #### no warnings qw[exiting];