Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

(shockme) Re: Re: Spreadsheet::WriteExcel::Big is Bigger

by shockme (Chaplain)
on Jan 23, 2002 at 22:25 UTC ( [id://140969]=note: print w/replies, xml ) Need Help??


in reply to Re: Spreadsheet::WriteExcel::Big is Bigger
in thread Spreadsheet::WriteExcel::Big is Bigger

Nope, you're not missing a thing. I uploaded the wrong version of my script. Here's the portion you're questioning from the actual script:
while ($inLine = <IN>) { my ($ip1, $port1, $ip2, $port2) = 0; my ($date, $log, $protocol, $firstIP, $secondIP, $packets) = split(/,/, $inLine); # strip port number if it exists if ($firstIP =~ /([\d.]+)\((\d+)\)/) { $ip1 = $1; $port1 = $2; } else { $ip1 = $firstIP; $port1 = " "; } if ($secondIP =~ /([\d.]+)\((\d+)\)/) { $ip2 = $1; $port2 = $2; } else { $ip2 = $secondIP; $port2 = " "; }

After a quick review, that seems to be the only difference. Sorry for the confusion.

If things get any worse, I'll have to ask you to stop helping me.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://140969]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others goofing around in the Monastery: (6)
As of 2024-03-19 11:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found