reading files and cgi

satanklawz has asked for the wisdom of the Perl Monks concerning the following question:

ok, i've developed a cgi that scans a server to test wether ports are open or not for a project that i am on.
my only problem is that how do i get perl to open up a file, read the contense of that file (line by line) and put them into a variable.

something like

while (<FILE>) {
$A = input from file;
#all of my socket stuff is here
)

close(FILE);

or even better, now that i think about it while i write this, how could i get it to parse an nmap output line by line?

any suggestion?

russ

Comment on reading files and cgi

Replies are listed 'Best First'.
Re: reading files and cgi by growlf (Pilgrim) on Dec 05, 2001 at 04:29 UTC
Just a quickie response (gotta run in a few minutes) but: check out this node. There are a couple perl modules in the making for nmap as well and I know others will post the links to them shortly, but until they do you may want to spend some more time with joining the nmap-hackers mailing list/forum. Quite a few topics such as this have come through there in the last few weeks. Also, from this node, here is a code snippet for reading in a file: `open (INPUT, $filename) \|\| die "Can't open $filename: $!"; while (<INPUT>) { hack($_); slice($_); dice($_); vacuum_seal($_); } close INPUT \|\| die "Wow, we're in for it now: $!";` [download] Here are a few more nodes to look at on the subject. Another thing to look into might be File::Slurp? And never forget (as I was recently reminded by The Footpad grin) - supersearch is your friend! G	[reply] [d/l]

Replies are listed 'Best First'.

Re: reading files and cgi
by growlf (Pilgrim) on Dec 05, 2001 at 04:29 UTC

this

Also, from this node, here is a code snippet for reading in a file:

open (INPUT, $filename) || die "Can't open $filename: $!";
while (<INPUT>) {
    hack($_);
    slice($_);
    dice($_);
    vacuum_seal($_);
}
close INPUT || die "Wow, we're in for it now: $!";
[download]

*G*