c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my @ra = (1 .. 5);
 ;;
 my @rb = map { $_ == 3 ? () : $_ } @ra;
 dd \@rb;
"
[1, 2, 4, 5]