#!/usr/bin/env perl use strict; use warnings; use Data::Dump; my @options = map { /optional:(.*)\b/g } @ARGV; dd @options; #### ./t.pl alpha bravo optional:charlie optional:delta optional:echo ("charlie", "delta", "echo")