I don't know of a module... But I managed to use the parallel port to detect
a button push with plain old Perl code =)
Here's a snippet:
sysopen IOPORT, "/dev/port", O_RDONLY; # Open LPT Port
sysseek IOPORT, 889, 0 or die "sysseek() failed: $!\n"; # Select Port 0x379
$nstatus = sysread IOPORT, $status, 1; # Read 1 Char
if (not defined $nstatus or $nstatus != 1) { die "sysread() failed: $!\n"; }
$status = unpack "B8", $status; # Transform to 8 binary bits
This example is only for input, if you want to output data you'll have to do
some homework ;)
Please note: This should work on any Linux... Never tried on any other OS.
HTH.
Later.-
> Hi, I was just wondering, can I send data through the parallel port using
perl? And If yes, how ? With some kind
> of a module ? And where can I read more about it? Thanks for any help
provided :))
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
