Wie zu alten DOS-Zeiten....

Grafische Oberflächen sind zwar sehr nett, aber manchmal einfach zu umständlich, so z.B. beim Drucken von Programmausgaben, die üblicherweise direkt am Prompt erfolgen. Manchmal braucht man solche Ausdrucke - und womöglich viele davon. Bei mir kommt das vor. Entweder gibt man dem Drucker jedesmal alle Optionen vor oder man baut sich ein kleines Skript:

Ich habe das folgende unter ~/bin/lpr_mit_rand gespeichert und mit dem Recht zum Ausführen versehen:

#! /usr/bin/perl

my $line;
my $file;
my $args;
my $anzahl;

$args = $#ARGV + 1;
if (1==$args) {
  $anzahl=int($ARGV[0]);
} else {
  $anzahl=1;
}

while ($line=<STDIN>) {
   $file.=$line;
}
system ("echo '$file' | lpr -o page-left=100 -o page-top=30 -o wrap=true -# $anzahl");

Das macht nichts weiter, als die Daten entgegen zu nehmen und mit der Einstellung eines Randes sowie ggf. Zeilenumbrüchen auf dem Standarddrucker auszudrucken.

Mit einem "whois euroweb.bg | lpr_mit_rand" erhalte ich dann folgendes Ergebnis:

Wenn ich eine Anzahl übergebe ("whois euroweb.bg | lpr_mit_rand 3"), dann kommt auch diese Zahl an Ausdrucken. Ist doch viel hübscher und viel besser abheftbar als wenn alles an den linken Rand gequetscht wird: Oder? Und bequem ist es auch.

Ein wenig Euroweb ist natürlich auch dabei. Allerdings nur für Hardcore-Bescheidwisser.

Ein von der Euroweb/Kanzlei Berger genannter Zeuge wird schon bald sehr interessante Fragen zu beantworten haben. Falls er denn nach Düsseldorf kommt.