• [^] # Re: ça fonctionne !

    Posté par (site web personnel, Mastodon) . En réponse au message Pince ampèremétrique USB. Évalué à 1. Dernière modification le 23 octobre 2016 à 09:38.

    En perl c'est simple : 

     #!/usr/bin/perl
 use Device::SerialPort;
 my $file = "/dev/ttyACM0";
 my $port = Device::SerialPort -> new($file);
 $port -> baudrate(19200);
 $port->write_settings();
 open(DEV, "<$file") or die;
 $port->write(); 
 if ($_ = <DEV>) { print $_ ; }