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

##</code><code>##

splice @array, 2, 1;

##</code><code>##

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