I do not mean like this..
My question is -:
For every function I declare in the package Do I have to declare in the new method also.
Like If I remove
Then the initialization method fail to work.
I hope you understand my point
All
Please help me to call url in Perl. Ex:
http://www.test.com/dynf?urn=123
Assume it will return success if 123 is in urn or it will return " failed".
I want store this return type in a variable.
Please help me to call the URL through PERL.
Thanx in advance
Regards
Deepak (1 Reply)
Hi all,
Not sure if this is the right forum to post query regarding perl script.
I have a perl script which internally calls a shell script. My problem is that the shell script should be passed command line arguments.
I call a shell script from perl using:
system("sript.sh");
How do... (3 Replies)
Hi,
I would like to invoke "Winzip" utility from a perl script, input the name of zip file and provide output path for unzipped files. Any pointers will be appreciated.
Thanks (5 Replies)
Hi,
I am trying to execute a perl script from c program.
I tried using system command.
system("perl test.pl filename") ;
This perl program takes filename as input and prints a number
to screen.
I need to get that returned number in C program.
system command is... (3 Replies)
Hi ,
Here is my piece of code--
main();
sub main
{
$result = GetOptions ("LogDir=s" => \$LogDir,
"Summary" => \$Summary,
"Indiviual=s" => \$Individual ,
"Diagnostics=s" => \$Diagnostics,
... (1 Reply)
On bash I run precompiled c Program as follows:
./create_cust 1 10000 US S > us_cust.csv
create_cust is a c program and requires 4 parameters.
I am redirecting the output of this program to csv file
I need to run this same program in perl
I am aware of exec command though not... (7 Replies)
hi all,
I have 3 perl scripts a.pl,b.pl and c.pl
each of these work when i pass a date for eg: perl c.pl 2010-05-27
now i want to write a perl script that would call the 3 scripts and make it run all the 3 scripts (a.pl,b.pl,c.pl) parallelly rather than 1 after the other.......
pls... (2 Replies)
All,
Is it possible to call a subroutine from the perl expect module after logging to a system that is within the same program. My situation is I need to run a logic inside a machine that I'm logging in using the expect module, the logic is also available in the same expect program.
Thanks,... (5 Replies)
Can anyone break down the different methods of using SSH in perl? I'm currently using Net::SSH::Expect, which allows me to login to a machine and execute multiple commands without having to ssh again. This feature of holding the session works well for me, but it's slow. If I set timeouts to 4... (3 Replies)
Note: Not a programmer by profession but occasionally have to program.
I am looking for general methods and freely/readily available tools employed to debug problems during development of perl scripts. Anything that has really helped you out with problems you just couldn't find.
A couple of... (5 Replies)
Discussion started by: Vi-Curious
5 Replies
LEARN ABOUT DEBIAN
io::async::protocol::stream
IO::Async::Protocol::Stream(3pm) User Contributed Perl Documentation IO::Async::Protocol::Stream(3pm)NAME
"IO::Async::Protocol::Stream" - base class for stream-based protocols
SYNOPSIS
Most likely this class will be subclassed to implement a particular network protocol.
package Net::Async::HelloWorld;
use strict;
use warnings;
use base qw( IO::Async::Protocol::Stream );
sub on_read
{
my $self = shift;
my ( $buffref, $eof ) = @_;
return 0 unless $$buffref =~ s/^(.*)
//;
my $line = $1;
if( $line =~ m/^HELLO (.*)/ ) {
my $name = $1;
$self->invoke_event( on_hello => $name );
}
return 1;
}
sub send_hello
{
my $self = shift;
my ( $name ) = @_;
$self->write( "HELLO $name
" );
}
This small example elides such details as error handling, which a real protocol implementation would be likely to contain.
DESCRIPTION
This subclass of IO::Async::Protocol is intended to stand as a base class for implementing stream-based protocols. It provides an interface
similar to IO::Async::Stream, primarily, a "write" method and an "on_read" event handler.
It contains an instance of an "IO::Async::Stream" object which it uses for actual communication, rather than being a subclass of it,
allowing a level of independence from the actual stream being used. For example, the stream may actually be an IO::Async::SSLStream to
allow the protocol to be used over SSL.
As with "IO::Async::Stream", it is required that by the time the protocol object is added to a Loop, that it either has an "on_read"
method, or has been configured with an "on_read" callback handler.
EVENTS
The following events are invoked, either using subclass methods or CODE references in parameters:
$ret = on_read $buffer, $eof
The "on_read" handler is invoked identically to "IO::Async::Stream".
on_closed
The "on_closed" handler is optional, but if provided, will be invoked after the stream is closed by either side (either because the
"close()" method has been invoked on it, or on an incoming EOF).
PARAMETERS
The following named parameters may be passed to "new" or "configure":
on_read => CODE
CODE reference for the "on_read" event.
handle => IO
A shortcut for the common case where the transport only needs to be a plain "IO::Async::Stream" object. If this argument is
provided without a "transport" object, a new "IO::Async::Stream" object will be built around the given IO handle, and used as the
transport.
METHODS
$protocol->write( $data )
Writes the given data by calling the "write" method on the contained transport stream.
$protocol->connect( %args )
Sets up a connection to a peer, and configures the underlying "transport" for the Protocol. Calls "IO::Async::Protocol" "connect" with
"socktype" set to "stream".
AUTHOR
Paul Evans <leonerd@leonerd.org.uk>
perl v5.14.2 2012-10-24 IO::Async::Protocol::Stream(3pm)