Microsoft Windows 2000 [Version 5.00.2195]
(C) Copyright 1985-2000 Microsoft Corp.

G:\privat\perl\forum>output.pl
Ich habe folgenden output erhalten:
 Datenträger in Laufwerk G: ist USB-STICK
 Datenträgernummer: BCD0-06D0

 Verzeichnis von G:\privat\perl\forum

04.08.2004  13:11       <DIR>          .
04.08.2004  13:11       <DIR>          ..
04.08.2004  13:14                1.302 peggy.pl
17.08.2004  15:17                  143 output.pl
17.08.2004  15:01                  200 testdatei.txt
17.08.2004  15:12                  256 datei_zeilen_weg.pl
               4 Datei(en)          1.901 Bytes
               2 Verzeichnis(se),      33.234.944 Bytes frei
-----------------------------------------------------------------

G:\privat\perl\forum>cat output.pl
#!/usr/bin/perl
use strict;
use warnings;

my $output = qx(dir);

print "Ich habe folgenden output erhalten:\n", $output, "-"x65, "\n";

G:\privat\perl\forum>