>
> This is what I'm using to find the file. .I still can't delete the
> file or replace it with the file I created.
>
> Help pls Thanx
>
> se strict;
> use File::Find;
> use CGI qw(:standard);
> my $query = param("Toetsss");
> undef $/;
>
> find( sub
> {
> return if($_ =~ /^\./);
> re
Charlene Gentle wrote:
Hi
Hello,
This is what I'm using to find the file. .I still can't delete the
file
perldoc -f unlink
or replace it with the file I created.
perldoc File::Copy
se strict;
use File::Find;
use CGI qw(:standard);
my $query = param("Toetsss");
undef $/;
find( sub
{
return if
Hi
This is what I'm using to find the file. .I still can't delete the
file or replace it with the file I created.
Help pls Thanx
se strict;
use File::Find;
use CGI qw(:standard);
my $query = param("Toetsss");
undef $/;
find( sub
{
return if($_ =~ /^\./);
return unless($_ =~ /Toetsss.txt
