Как мне избавиться от STDERR в Perl

Я использую некоторые системные команды в Perl.

В приведенном ниже случае я получил следующий вывод:

ls: import-log.*: No such file or directory

ls: error-log.*: No such file or directory

No specified files found for deletion

Мой код:

sub monthoryear() 
{

  @importlog = `ls -al import-log.*`;

  @errorlog = `ls -al error-log.*`;

}

Я не хочу видеть следующее в выводе, даже если нет файлов.

ls: import-log.*: No such file or directory &

ls: error-log.*: No such file or directory
7
задан DVK 25 February 2011 в 18:06
поделиться