Я пошел бы для второй опции. Вообще говоря, пространство RGB не действительно хорошо для того, чтобы сделать цветное управление (создающий переход от одного цвета до другого, светясь / затемнение цвета, и т.д.). Ниже два сайта, которые я нашел с быстрым поиском для преобразования от RGB до HSL:
сначала grep ARGV.
@ARGV = grep { $_ !~ /\d+\.\d+\.\d+/ } @ARGV;
while (<>)
{
# do something with the other files
}
Решение Пола Руба лучше всего, если вы можете отфильтровать @ARGV
перед тем, как начать читать какие-либо файлы.
Если вам нужно пропустить файл после того, как вы начали итерацию it,
while (<>) {
if (/# Skip the rest of this file/) {
close ARGV;
next;
}
print "$ARGV: $_";
}
Пол Руба , ответ работает для получения дополнительной информации, см. Раздел операторов ввода-вывода на странице руководства perlop . Упоминается шаблон использования grep, а также несколько других вещей, связанных с <>.
Обратите внимание на упоминание ARGV :: readonly относительно таких вещей, как:
perl dangerous.pl 'rm -rfv *|'