in reply to Re: improve script
in thread improve script

:D  /(...)/ and print ... and exit

In Section Seekers of Perl Wisdom