local *SOMEFILE;
open(SOMEFILE, $file);
binmode(SOMEFILE)
my $crc = crc32(*SOMEFILE);
close(SOMEFILE);