;join($FindBin::Bin, $listfn))
Hop can help
Marcos
> -Original Message-
> From: Bryan Harris [mailto:[EMAIL PROTECTED]
> Sent: Thursday, July 22, 2004 8:02 AM
> To: Beginners Perl
> Subject: CGI script just stops...
>
>
>
>
> This one baffles
This one baffles me:
> print "$listfn, I guess we got here.\n";
>
> # write additions to their file
> open(LISTFILE, ">>$listfn") || print "$listfn could not be
> written: $!\n";
> print LISTFILE join("\n", @newlist, "");
> close(LISTFILE);
>
> print "Here too?\n";
This is part of a CGI scri