eternity Perl