Time for Change - Perl alternative