use subs 'crypt';

sub crypt { CORE::crypt($_[0], $_[1]) }

print crypt( (time) x 2 );