perlを使ってSVN stderrsを/ dev/nullにリダイレクトする方法

Question

svn repoパスでは利用可能なデータがあるがsvnには追加されていないかどうかをチェックするスクリプトがあります。それは私のためにうまく動作しますが、これは以下のようなファイルの追加と送信のための標準エラーを提供します。

Adding   1/a 
Sending  1/a 
Transmitting file data ........... 
Committed revision 529. 

コード：

use strict; 
use warnings; 

sub notAdded { 
     my @svnstatus = `svn st`; 
     foreach my $status (@svnstatus) { 
       chomp($status); 
       if ($status =~ m/^?/) { 
         my ($symble, $left) = split(' ', $status); 
         system("svn add $left"); 
       } 
     } 
} 

&notAdded(); 
system("svn commit -m 'comment'"); 

誰もが、私はスクリプト内では/ dev/nullに、このエラーをリダイレクトすることができますどのように私を提案してくださいすることができます。

svn -q add nothere 

表示何：

Answer 1

SVNとの望ましくない出力を非表示にする通常の方法は、-q（クワイエット）フラグを使用することです。

Answer 2

それとも本当に簡単な方法：

system("svn add $left 2>/dev/null");