[RanSEE]

I’m trying to use regular expression to match return text from SQL Plus,

Код:

ITEM   COST
-----  ------
SHOES  $10.99	
COAT   $24.95

I want to skip the ITEM line and also the hyphen line. The number of hyphens will vary depending on the values returned by the SQL script.

I can break the lines into words with:

Код:

my @wordsOnLine = split (/\s+/, $line);

This test works fine for skipping the ITEM line

Код:

if ($wordsOnLine[0] eq "ITEM") {next;}

But I want to use regular expressions so I can match the hypen line of any length. These are the lines I used, and neither one of the if statements work to skip the lines:

Код:

if ($wordsOnLine[0] =~ "/^ITEM$/") {next;}
if ($wordsOnLine[0] =~ "/^-+$/") {next;}

How do I write a perl if statement to completely match a regular expression?

I Am new at perl, so please bear me.

[iJumbo]

Have you tried without $ ($ means end of string)

[SchurmanCQC]

Yes... I believe that '$' is the end of line/string character.

[RanSEE]

Thank you!
Figured,

Код:

next if $line =~ /^ITEM/ or $line =~ /^[-\s]+$/;

I didnt need to split that line as well

[iJumbo]

Ok so that correct?

[FunnyBear]

Its right now

[RanSEE]

Quote:

Originally Posted by iJumbo Ok so that correct?

Yes it is, thank you!