c:\@Work\Perl>perl -wMstrict -le
"my $path = '/@Work/Perl/monks/yngwi';
 my @dirs = `dir $path`;
 print qq{@dirs};
"
Invalid switch - "@Work".

c:\@Work\Perl>perl -wMstrict -le
"my $path = '\@Work\Perl\monks\yngwi';
 my @dirs = `dir $path`;
 print qq{@dirs};
"
 Volume in drive C is Acer
  Volume Serial Number is 9480-355B

  Directory of c:\@Work\Perl\monks\yngwi

 04/02/2011  05:51 PM    <DIR>          .
 04/02/2011  05:51 PM    <DIR>          ..
 04/02/2011  06:18 PM             2,255 detect_class_method_1.pl
                1 File(s)          2,255 bytes
                2 Dir(s)  64,490,688,512 bytes free