Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: Using Perl to make a hot-lead from any port

by mattr (Curate)
on Oct 05, 2005 at 15:14 UTC ( [id://497632]=note: print w/replies, xml ) Need Help??


in reply to Using Perl to make a hot-lead from any port

My first thought was how about using the speaker and using perl to drive some midi or wav player.

But how about this freshmeat registered project on sourceforge? "usb-robot lets you quickly prototype USB device drivers in almost any language Perl, Python or whatever. You can even try out your ideas by directly typing in USB commands from the console."

Likewise, perl-libusb is a Perl XS/XSUB interface to the libusb library, to allow you to program/talk to USB devices from user space under Linux or FreeBSD.

Also check out Perl Serial Programming Resources and here is a document on connecting circuits to your computer via parallel port, usb, etc. I'm not a hardware guru but it has examples of safe circuits and bad ones, covers windows and dos, controlling the port from the web, optoisolators and solid state relays for controlling high power levels, circuit diagrams and links to other resources and kits, etc. You may be able to use one of the CPAN modules with it though it also provides some C code and tells you how to use it. Maybe someone with hardware experience would like to mention their opinion of this apparently comprehensive doc.

Finally, this Single Channel Control Line linked from the above article looks like it might be the answer to your question. It describes construction of a simple alarm driving circuit, with photos, circuit diagrams, a parts list, how to create the circuit board, and so on. Regardless of what country you are in, my guess is that any university or electronics company could handle the circuit side for you if you are not experienced with it, but it also has links to an online electronics course e.g. on parallel port interfacing (the Printer Port section in the robotut linked page).

Hope this helps. How about reporting back after you solve your problem?

  • Comment on Re: Using Perl to make a hot-lead from any port

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://497632]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others examining the Monastery: (3)
As of 2024-04-20 01:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found