#foreach (32 .. 126) { # my $c = chr($_); # try_char($c); #} map { my $c = chr($_); try_char($c); } (32 .. 126);