Eu estou procurando maneiras de obter somas de verificação de arquivo em Perl, mas não executando o comando do sistemacksum - gostaria de fazê-lo no próprio Perl porque o script precisa ser portátil entre o UNIX e o Windows.cksum <FILENAME> | awk '{ print $1 }' funciona no UNIX, mas obviamente não no Windows. Eu exploreiMD5 mas parece que é necessário obter uma alça de arquivo e, geralmente, não parece ser uma maneira muito compacta de obter esses dados (uma linha preferível).

Existe uma maneira melhor?