code help

2010-10-25 Thread saran
i am new to perl. please help me with this piece of code below. answer wat it prints is correct but the format has to adjusted...! program to convert Celsius to Fahrenheit ** #!/usr/bin/perl use warnings; use strict; p

perl code help

2010-10-25 Thread saran
i am new to perl. please help me with this piece of code below. answer wat it prints is correct but the format has to adjusted...! program to convert Celsius to Fahrenheit ** #!/usr/bin/perl use warnings; use strict; p

Re: devices without division

2011-04-20 Thread Saran
Here is the program use strict; use warnings; my ($div,$reminder) = ÷_now(20,4); print "Dividend: $div\nReminder: $reminder\n"; sub divide_now { my ($a,$b) = @_; my ($s,$n); for($n=1;;$n++) { $d+=$b; $s = $a - ($n*$b); retu

Re: help me for this error

2011-05-18 Thread Saran
Try something like if(scalar(@ARGV) != 3) { The above statement will execute if there is less than or greater than three command line arguments.. ~ Saran On May 18, 2:37 pm, benignb...@gmail.com (Balachandran Sivakumar) wrote: > On Wed, May 18, 2011 at 2:55 PM,   wrote: > > A

Re: word boundry

2011-05-18 Thread Saran
http://perldoc.perl.org/perlre.html --> Try reading this Assertions Page You can also try something like if(~/\s+error\s+|^error\s+|\s+error$/si) this means one or more blank spaces sometimes the error word may be in beginning(^error\s+) or in the end of line(\s+error$). ~ Saran On May

Serial port programming in perl

2007-08-16 Thread Saran . j . jegan
Hello, am just started in perl, am in need to access a serial port and read the data s coming from that , i came to see several modules to do this but i dont know which will be easier to use whether Device::SerialPort is worth enough, can any suggest me how to use them ? -- To unsubscribe, e-ma

Re: Serial port programming in perl

2007-08-17 Thread Saran . j . jegan
On Aug 17, 4:48 pm, [EMAIL PROTECTED] (Zentara) wrote: > On Thu, 16 Aug 2007 09:11:17 -, [EMAIL PROTECTED] wrote: > >Hello, am just started in perl, am in need to access a serial port and > >read the data s coming from that , i came to see several modules to do > >this but i dont know which wil

Socket Programming with Perl

2007-08-20 Thread Saran . j . jegan
Hello, Do any suggest me successful module for socket communication in perl under windows environment and some prerequisite for it. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Socket Programming with Perl

2007-08-20 Thread Saran . j . jegan
On Aug 20, 12:12 pm, [EMAIL PROTECTED] (Saran j jegan) wrote: > Hello, > Do any suggest me successful module for socket communication > in perl under windows environment and some prerequisite for it. There are dump of modules ,which might be the best one from yours experience

Read and write operation in serial port

2007-08-28 Thread Saran . j . jegan
Hello, am using win32::serial port for serial communication i can open the port and able to update the settings such as baud rate , parity etc.,but i need to know how to transfer the data through it (read and write), can any give me sound examples -- To unsubscribe, e-mail: [EMAIL PROTECTED] Fo

win32::serialport

2007-09-20 Thread Saran . j . jegan
Hello, Am using win32::serial port module for serial communication in perl . from cpan i come to see the read & write operation can be performed using file handle $PortObj = tie (*FH, 'Win32::SerialPort', $Configuration_File_Name)

win32 serial port

2007-09-26 Thread Saran . j . jegan
Hello , am using win32::serialport module to communicate with my serial port device, this is my code use Win32::SerialPort; my $serial_port; my $return; my $quiet = 1; $serial_port = Win32::SerialPort->new ($port,1) die "Can't open serial port $port: $^E\n" unless ($serial_port); my $configFile=