Perl problem

Shazer2

Baseband Member
Messages
89
Alright, I have that code but when I try to execute it, it has an error
message of:

Unrecognized character \XA0; Marked by <-- HERE after <-- HERE near column 1 at backup.pl line 10


Just wondering if anyone knows what the problem is?


use strict;
use warnings;

my $startDir = 'C:\Documents and Settings\Shannon\Desktop\SETUPS AND FILES';
my $newDir = 'G:\BACKUP';

myReadDir($startDir);

sub myReadDir {
my ($dir) = @_;
opendir (DIR, $dir);
my @dir = readdir (DIR);
closedir(DIR);
foreach my $file (@dir)**{
next if ($file eq '.' or $file eq '..');
if (-d $file) {
print "$file is a directory\n";
myReadDir("$dir/$file");
}
}
}
 
Back
Top Bottom