Select Code to Download

my @a = ( 42, 42, 43, 43, 43, 44, 45, 46 );
my @b = ( 43, 45 );
...
}
@a = grep { defined } @a;
print join ', ', @a; print "\n";

my @a = ( 42, 42, 43, 43, 43, 44, 45, 46 );
my @b = ( 43, 45 );
...
}
@c = grep { defined } @c;
print join ', ', @c; print "\n";