in reply to Re: Re: compare stdin for a number
in thread compare stdin for a number

Does this help? perl -lne "print m/^\d{5}$/ ? ' OK' : ' Fail'"

tachyon

In Section Seekers of Perl Wisdom