mirror of
https://github.com/brmlab/lasic.git
synced 2025-06-08 17:23:59 +02:00
Perl Lasic driver - basic module, PBM renderer and two example scripts.
Untested with real hardware yet.
This commit is contained in:
parent
781fe97c3e
commit
688d2450d0
4 changed files with 321 additions and 0 deletions
16
perl/render.pl
Executable file
16
perl/render.pl
Executable file
|
@ -0,0 +1,16 @@
|
|||
#!/usr/bin/perl
|
||||
#
|
||||
# Render a PBM image using Brm::Lasic - pass it as a parameter!
|
||||
|
||||
use warnings;
|
||||
use strict;
|
||||
|
||||
use lib qw(.);
|
||||
use Brm::Lasic;
|
||||
use Brm::Lasic::PBM;
|
||||
|
||||
my $lasic = Brm::Lasic->new(dev => '/dev/ttyUSB0');
|
||||
$lasic->reset();
|
||||
|
||||
my $pbm = Brm::Lasic::PBM->new(lasic => $lasic, file => $ARGV[0]);
|
||||
$pbm->render();
|
Loading…
Add table
Add a link
Reference in a new issue