my @newlist = map {
                    my $l = $_;
                    $l =~ s|/etc/||;
                    $l;
                  }  @oldlist;