On 01/04/2005, GR Kumaran wrote:
> #!c:/sieperl/perl/5.8.0/bin/MSWin32-x86-perlio/perl
>
> use CGI;
> use warnings;
> use strict;
>
> my $page = new CGI;
>
> if (DEBUG) {
> open(DEBUGFILE, ">>debug.txt") || die;
> $page->save(DEBUGFILE);
> close(DEBUGFILE);
> }
> =
Hello,
What is error in this program?
===
#!c:/sieperl/perl/5.8.0/bin/MSWin32-x86-perlio/perl
use CGI;
use warnings;
use strict;
my $page = new CGI;
if (DEBUG) {
open(DEBUGFILE, ">>debug.txt") || die;
$page->save(DEBUGFILE);
close(DEBUGFILE);
}