SHA 2 implementation in Perl for educational purposes