topic Re: Perl Regular Expressions in Operating System - Linux

Perl Regular Expressions

Junior C. — Fri, 08 Sep 2006 15:39:23 GMT

I have the following in a text file.

autocalcs
cdms
mservrs
XIPMessageQueue_7.0

=====

while($line = )
{
chomp ($line);
$line =~ /^(\w+)\s+(\S+)........

output from above:

autocalcs
cdms
mservrs

===============

while($line = )
{
chomp ($line);
$line =~ /^(\w+[_0-9.]+)\s+(\S+)........

output:

XIPMessageQueue_7.0

I'm looking for syntax to match all 4
autocalcs
cdms
mservrs
XIPMessageQueue_7.0

I appreciate all help.

JC.

Re: Perl Regular Expressions

Stuart Browne — Fri, 08 Sep 2006 22:24:40 GMT

Well, you could just use \S+ (non-space), but that'll allow you to include symbols as well.

\w already does alpha-numeric-and-underscore, what you need to include is the '.'.

So '/^([\w\.]+)\s+(\S+)...' is what you're after.

Re: Perl Regular Expressions

Alexander Chuzhoy — Sat, 09 Sep 2006 06:36:08 GMT

This will also work:

$line=~/^([A-z0-9_.]+)\s+(\S+)....

Regards.

Re: Perl Regular Expressions

Junior C. — Sat, 09 Sep 2006 12:23:01 GMT

Thread Close