Hi to all,

i need to extract from a list of words (in a single column) anotherl list containing only the words of 5 or less chars.

I wrote this script, but it doesn't work:

#!/usr/bin/perl -w

while (<>)
        {
        print "$_" if /^\w{,5}/;
        }

someone can tell me why it does not work?

Thanks all,

alladr


|^|_|^|_|^|                              |^|_|^|_|^|    
 |            |                                 |            |
 |            |                                 |            |
 |            |*\_/*\_/*\_/*\_/*\_/* |            |
 |                                                           |
 |                                                           |
 |                                                           |
 |         http://www.e-allora.net        |
 |                                                           |
 |                                                           |
**************************************


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to