Select Code to Download

@arr=qw(19205134 18630215 18453487 18416242 18338715 18227590 17698645
+);

...

foreach $e (@arr, @arr1) { $count{$e}++ }