Select Code to Download

>uname -a
Linux enterprise 2.6.37.6-foken #2 SMP Sun Aug 14 02:20:59 CEST 2011 x
+86_64 AMD Athlon(tm) II Neo N36L Dual-Core Processor AuthenticAMD GNU
+/Linux
...
    /usr/lib64/perl5/site_perl
    /usr/lib64/perl5/vendor_perl
    .

C:\Users\alex>perl -E "$file=chr(34).chr(34); say $file.' '.(-e($file)
+ ? 'yes' :  'no')"
"" yes
...
    .

C:\Users\alex>

C:\Users\alex>perl -E "stat(chr(34).chr(34)) or die $!; say 'huh?'"
huh?

C:\Users\alex>

>perl -E 'stat(q[""]) or die $!; say "huh?"'
No such file or directory at -e line 1.

>

C:\Users\alex>perl -MData::Dumper -E "@a=stat(chr(34).chr(34)) or die 
+$!; say Du
mper(\@a)"
...


C:\Users\alex>

C:\Users\alex>perl -MData::Dumper -E "for $x (chr(34).chr(34),'.','..'
+) { @a=stat($x); say Dumper(\@a) }"
$VAR1 = [
...


C:\Users\alex>

C:\Users\alex>perl -MData::Dumper -E "@a=stat(chr(34).'Desktop'.chr(34
+)); say Dumper(\@a)"
$VAR1 = [];
...


C:\Users\alex>

#include <stdio.h>
#include <sys/types.h>
...
    printf("stat(\"\") = %i\n",stat("\"\"",&st));
    return 0;
}

X:\>gcc -o stattest.exe stattest.c

...
stat("") = -1

X:\>