Phoenix.pm: Perl stuuf
Glen G. Walker
coyotl at primenet.com
Tue Mar 2 14:59:25 CST 1999
On Tue, 2 Mar 1999, Glen G. Walker wrote:
> $text = $FORM{'text'};
> $action = $FORM{'action'};
> $action = "nada" unless $action;
>
> if ($action =~ "norm") {
> unless (open (TEXT, ">$path/idx.txt")) {
> $msg = "(1) Could not open $path/idx.txt";
> &mailme;
> exit;
> }
> print TEXT "$text";
> close <TEXT>;
>
Well, apparently, it was the fact that I wrote <TEXT> instead of TEXT in
the close statement....
Doh...
Boy, ain't that a peach...
-------------------------------------------------------------------------------
Glen G. Walker, coyotl at primenet.com
www.primenet.com/~coyotl
-------------------------------------------------------------------------------
More information about the Phoenix-pm
mailing list