On Fri, Feb 02, 2001 at 12:34:47AM -0500, Louis A. Mamakos wrote:
> > >>>>> Warner Losh writes:
> >
> > > Even the name (dd) comes from IBM's control language (JSYS?).
> >
> > Huh! I never realized that.
> > //GO.SYSIN DD *
> > ...
> > //
> > Where are my punch cards? :-)
>
> man 6 bcd
Come to think of it, since bcd(6) doubles as ppt(6), why isn't there
already something like the attached script? :)
G'luck,
Peter
--
This sentence was in the past tense.
#!/usr/bin/perl -wT
# $Id: unppt.pl,v 1.1 2001/02/02 10:33:42 roam Exp $
# unppt - a trivial script to convert ppt(6)'s output back to ASCII.
use strict;
MAIN:{
my $line; # input line processed
while (defined($line = <>)) {
chomp $line;
next unless $line =~ /^\|([ o]*)\.([ o]*)\|$/;
$line = "$1$2";
$line =~ tr/ o/01/;
print pack("B*", $line);
}
print "\n";
}
To Unsubscribe: send mail to [EMAIL PROTECTED]
with "unsubscribe freebsd-hackers" in the body of the message
