my @arr = qw(a b c d c e f); insert_after_first(\@arr, "c", "x");