Help for this page

Select Code to Download

Select or download this

# warning windows double quotes
perl -nle "BEGIN{map{$w{$_}++}map{/^(.*\d)-(.+)$/?$1..$2:$_}split /,/,
+pop @ARGV}print if exists $w{$.}" FILENAME 1,2,4-6,11-13