my $var1alt = substr "00000000000000".$var1, -14; my $var2alt = substr "00000000000000".$var2, -14;