Help for this page

Select Code to Download


  1. or download this
    use Fcntl qw(O_CREAT O_EXCL O_WRONLY);
my $i;
...
        last;
    }
}
  2. or download this
    my $i;
while(1) {
...
        last;
    }
}
  3. or download this
    use Fcntl qw(O_CREAT O_EXCL O_WRONLY);
my $i;
...
        last;
    }
}