perl - ディレクトリ内のファイルをPerlのプリンタに送信するには?

Question

さて、これが私がやろうとしていることです：

一連の MIME 添付ファイルを含む電子メールがあります。デコードされた添付ファイルを含むディレクトリを作成するまでのサンプルコードがあります。ここで行う必要があるのは、そのディレクトリの内容を lpr に送信することです。(悪いファイル形式を選別しているわけではありません。処理はスプーラ デーモンに任せています。)

Answer 1

使用についてglob:

my @files = glob($decode_directory/*);
system "lpr", @files;

glob引数をより選択的にすることができます。このsystemように記述された関数は、シェルの起動を回避し、lprコマンドを直接実行します。