perl -e'open FH,"<test.pl"||die$!;$fh=\*FH;sysread($fh,$foo,256); $bar=tell($fh);print"$foo\n$bar\n";' [download]
In reply to Re^2: tell() on sysread() by Taulmarill in thread tell() on sysread() by perlcapt