php - Reading Serial Port in Perl -

-

i'm bit tired of reading serial port, using perl first of perl not primary development tool, i'm php background. please guide me in right way. intention read data weight machine web page, did lot of research on topic.

the browser app cannot read serial port data directly choose user end machine can installed server (apache) , task php , web application can read result using ajax call localhost url idea working great on linux machines on windows pc stuck.

i understand php can't read data serial port in windows linux choose perl stuff. did search got few codes , last 8 hours i'm fighting :(

#!e:\xampp\perl\bin\perl.exe # above line perl execution path in xampp # below line tells browser, script send html content. # if miss line show "malformed header script" error.    print "content-type: text/plain\n\n";   # use strict; use warnings;   use win32;   require 5.003;   use win32::serialport qw( :stat 0.19 );   print "here";   $portobj = new win32::serialport ("com3") || die "can't open com3: $^e\n";   print "here";   $portobj->user_msg(on);   $portobj->databits(8);   $portobj->baudrate(9600);   $portobj->parity("none");   $portobj->stopbits(1);   $portobj->handshake("rts");   $portobj->buffers(4096, 4096);    $portobj->error_msg(1);  # prints major messages "framing error"   $portobj->user_msg(1);      $portobj->write_settings || undef $portobj;     print "here";   # $portobj->save($configuration_file_name);   $portobj->read_interval(100);    # max time between read char (milliseconds)   $portobj->read_char_time(5);     # avg time between read char   $portobj->read_const_time(100);     print "here";    $string_in = $portobj->read("200");     print $string_in   # $portobj->baudrate(300);   # $portobj->restart($configuration_file_name);  # 9600 baud    $portobj->close || die "failed close";   undef $portobj;

the code not working on forum , many other places says working here , here, this , this.

im unable find means "use win32::serialport qw( :stat 0.19 );" importing library version number. ?

i'm installed xampp perl , activeperl win32::serialport 0.22 , api when run code return error like

error message: end of script output before headers: serial.pl

500 error

any idea ??

solved

for reading section use code below.

# warn "here";   ($ser) = @_;   ($numchars, $c);   $line = '';   {     {       ($numchars, $c) = $portobj->read(1);       #print "$numchars read=$c\n";     } while ($numchars < 1);     # print $c;     $line .= $c;   } while ($c ne "\n");    print $line;

the code works fine cli put php file read perl script , return data.

use win32::serialport qw( :stat 0.19 );

this same as

use win32::serialport ':stat', '0.19';

the :stat imports number of useful status constants, , explained under exports in documentation module

the 0.19 part of perl, , insisting version of win32::serialport must 0.19 or later. current version 0.22. if change 0.19 0.23 see effect has


Comments

Post a Comment

Popular posts from this blog

ios - RestKit 0.20 — CoreData: error: Failed to call designated initializer on NSManagedObject class (again) -

-
this error has shown on many times, seems. prominent answer issue seems restkit 0.20 — coredata: error: failed call designated initializer on nsmanagedobject class however, solution posted doesn't work me. let's start beginning: i want upload file server. want parse response make sure uploaded. if not, try again later. model has boolean variable called nsnumber *senttoserver purpose (in coredata, bool saved nsnumber ) . because don't know whether sending going successful, save entity coredata model first before sending via restkit. when post request successful, server returns json string this: {"id":14,"created":true} notice that, of course, id not set on coredata model yet, both id , created new informations model. here's model: @interface recording : nsmanagedobject @property (nonatomic, retain) nsstring * audiofilepath; @property (nonatomic, retain) nsdate * createdat; @property (nonatomic, retain) nsstring * deviceid; @...
Read more

java - Digest auth with Spring Security using javaconfig -

-
so i'm trying create digest authentication spring following documentation trying translate xml "requirements" in java requirements. let's have xml in docs: <bean id="digestfilter" class= "org.springframework.security.web.authentication.www.digestauthenticationfilter"> <property name="userdetailsservice" ref="jdbcdaoimpl"/> <property name="authenticationentrypoint" ref="digestentrypoint"/> <property name="usercache" ref="usercache"/> </bean> <bean id="digestentrypoint" class= "org.springframework.security.web.authentication.www.digestauthenticationentrypoint"> <property name="realmname" value="contacts realm via digest authentication"/> <property name="key" value="acegi"/> <property name="noncevalidityseconds" value="10"/> </b...
Read more

laravel - PDOException in Connector.php line 55: SQLSTATE[HY000] [1045] Access denied for user 'root'@'localhost' (using password: YES) -

-
my .env: app_env=local app_debug=true app_key=myappkey app_url=http://localhost db_connection=mysql db_host=localhost db_port=3306 db_database=gestiontaller db_username=root db_password='root' cache_driver=file session_driver=file queue_driver=sync redis_host=127.0.0.1 redis_password=null redis_port=6379 mail_driver=smtp mail_host=mailtrap.io mail_port=2525 mail_username=null mail_password=null mail_encryption=null i've tried password ", ' , without, restarting server every time. i've tried changing localhost 172.0.0.1. yes, password correct, running mysql -u root -p introducing password root in prompt can go mysql. users table: +------------------+-----------+ | user | host | +------------------+-----------+ | debian-sys-maint | localhost | | mysql.sys | localhost | | root | localhost | | root1 | localhost | +------------------+-----------+ i've added homestead.yaml this: database_port: 3306 ...
Read more