Select Code to Download

my @one = ( 1234, 5678, 9012 );
my @two = ( 1234, 7891, 9001, 9002 );
my $bad = 5678;

Use of uninitialized value in join or string at junk.pl line 21.
1234 5678 9012  9002