Select Code to Download

@filtered = grep { $_ ne $current_log } @original;

splice @array, 2, 1;

@filtered = @original[grep { $_ != 2 } 0 .. $#original];