#!/usr/bin/perl use warnings; use strict; my @array = grep ! /^--(?:config|enter)$/, @ARGV; print "@array";