$ perl -wE'
my %a = (13 => 1, 19 => 1);
my %b = (13 => 1, 19 => 1);
say keys %a;
say keys %b;'
1319
1913