Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: reg exp

by ungalnanban (Pilgrim)
on Mar 02, 2010 at 08:54 UTC ( #826103=note: print w/replies, xml ) Need Help??


in reply to reg exp

Are you trying for this. see the Example.
use strict; use warnings; while(1) { my $data=<STDIN>; if($data =~ /ipw\.[ar][a-z][a-z]*/) { print "Match\t\t$data \n"; } else { print "Not Match $data\n"; } }

We already answered for this question in "dont consider if (......)". First you learn regular expression.
Refer the following Links.

http://networking.ringofsaturn.com/Unix/regex.php#Grouping
http://www.troubleshooters.com/codecorn/littperl/perlreg.htm
--sugumar--

Replies are listed 'Best First'.
Re^2: reg exp
by venkatperl55 on Mar 02, 2010 at 13:11 UTC
    Good links, Thanks.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://826103]
help
Chatterbox?
[Discipulus]: more: just one thread in the last ~5 years
[Discipulus]: but Dumas is waiting for me in the bed.. luckly as book author.. see you!
[ELISHEVA]: Sleep well!
[ELISHEVA]: Or read well
[Discipulus]: thanks, best dreams to you all

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (9)
As of 2017-05-28 20:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?