do ("print"); print $!, "\n" if $!;