Win>perl a.pl
Error 0:

linux$ perl a.pl
Error 29: Illegal seek