zfilelen.pl revision 677833bc953b6cb418c701facbdcf4aa18d6c44e
#!/usr/bin/perl -w
use bytes;
local $/;
$_ = <>;
print length($_);
exit;