Ernie,
I'm assuming that @offline is an array of lines, so:
foreach $offline (@offline)
{
print MAIL "<p>$offline\n</p>";
$offline =~ m/(.{4}\..{4}\..{4})/;
$nodes=`/home/etucker/jvlresolve.pl $1`;
print MAIL "<p>$nodes\n</p>";
}
Give it a try, I haven't tested it again, the /g modifier on the regex
was needed in the first one I sent to you to keep matching until no more
were found. It isn't needed this time because we're doing it one line at
a time, therefore only one match is needed.
As Jeff said the error was a syntax error.
[Jeff - Post clipped]
HTH
Nigel
>>> "Tucker, Ernie" <[EMAIL PROTECTED]> 06/28/02 06:11pm >>>
Here is what I tried but didn't work. How can I correct this?
@offline=&ubr_con("show cable modem offline | incl $cable");
foreach $offline (@offline)
{
print MAIL "<p>$offline\n</p>";
$test= $offline =~
m/(.{4}\..{4}\..{4})/g);
$nodes=`/home/etucker/jvlresolve.pl
$test`;
print MAIL "<p>$nodes\n</p>";
}
here is the error I get. Thanks for everyones help. Something just
isn't
clicking yet.
syntax error at cablestatetest.pl line 173, near
"m/(.{4}\..{4}\..{4})/g)"
BEGIN not safe after errors--compilation aborted at cablestatetest.pl
line
340.
Ernest P. Tucker II
Network Technician
Madison Management Area
Charter Communications
The never-ending task of self improvement.
~ Ralph Waldo Emerson
ITM Business Solutions
Unit 4
Nine Trees Trading Estate
Morthen Road
Rotherham
S66 9JG
Reception
Tel: 01709 703288
Fax: 01709 701549
Help Desk
Tel:01709 530424
Fax: 01709 702159
CONFIDENTIALITY NOTICE: This message is intended only for the use of
the individual or entity to which it is addressed, and may contain
information that is privileged, confidential and exempt from disclosure
under applicable law.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
