which doesn't seem to be even close to what was requested. How can taking pairs of input lines (without verifying that the 1st line in a pair starts with TT:) do what was requested?
Hi all,
Have the following code(1) producing the results(2 & 3).
Would like to know if there is a way to format the two reports created in a similar fashion.
IE - The first is formatted nicely as a result of the echo "$xmpbdate $xavgs" >> $xmpbrpt
However when I attempt to do the same on... (7 Replies)
Hi guys ,
I have a file which contains following string.(filename tempdisplay)
(location 0.0.0.0:5900)
i needed to write a script which will extract the string that comes after
0.0.0.0 i.e the string :5900.
I have used following method to extract the string :5900 .Is it a preferred way of... (4 Replies)
I have a following string.
"machine=IFLMUD5HP0581&group1=Stop"
I have created 2 variables namely machine and action.
machine should contain
IFLMUD5HP0581
action should contain
Stop
How do i write a script for the same. (7 Replies)
I have a file called abc.txt which has following contents.
10.180.8.231=31608
10.180.8.232=29011
10.180.8.233=31606
10.180.8.234=40501
10.180.8.235=32591
10.180.8.236=31605
10.180.8.237=30561
10.180.8.238=14231
How would i find a ip address having maximum number of ram available.
Here... (2 Replies)
How would i write a script which will add a following content to a file.
File Before running script.
acpi = 1
apic = 1
builder = 'hvm'
device_model = '/usr/lib/xen/bin/qemu-dm'
disk =
File After running the script.
acpi = 1
apic = 1
builder = 'hvm'
device_model =... (5 Replies)
I am executing the following command:
sort file1.txt | uniq -c | sort -n > file2.txt
The problem is that in file 2, I get leading spaces, Like so:
1 N/A|A8MW11
8 N/A|ufwo1
9 N/A|a8mw11
10 900003|smoketest297688
10 N/A|a9dg4
10 danny|danni
12... (5 Replies)
Hi,
Can anyone tell me how i can convert all tab spaces inside a script to 4 spaces through another script.
Also i need to find if all the quotes are matching and ended properly. Any idea whould be of great help.
Many thanks! (3 Replies)
I am using FORTRAN 90 on AIX 5.3 and need to output my data to a tab-delimited file. It must have actual tabs, and I cannot figure out a way to make it work. The resulting file will be imported into another application (quickbooks) as an .iif file....for some reason, it needs the tabs; spaces do... (2 Replies)
I have the output like below:
DEV#: 9 DEVICE NAME: hdisk9 TYPE: 1750500 ALGORITHM: Load Balance
SERIAL: 68173531021
==========================================================================
Path# Adapter/Path Name State Mode Select Errors
0 ... (4 Replies)
Hi All,
Need your help in resolving the below issue.
I've a file called "data.txt" with the below lines:
TT: <tell://me/sreenivas>
<tell://me/100>
TT: <tell://me/sudheer>
<tell://me/300>
TT: <tell://me/sreenivas>
<tell://me/200>
TT: <tell://me/sudheer>
<tell://me/400>
... (3 Replies)
Discussion started by: raosr020
3 Replies
LEARN ABOUT DEBIAN
io::async::protocol::linestream
IO::Async::Protocol::LineStream(3pm) User Contributed Perl Documentation IO::Async::Protocol::LineStream(3pm)NAME
"IO::Async::Protocol::LineStream" - stream-based protocols using lines of text
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::LineStream );
sub on_read_line
{
my $self = shift;
my ( $line ) = @_;
if( $line =~ m/^HELLO (.*)/ ) {
my $name = $1;
$self->invoke_event( on_hello => $name );
}
}
sub send_hello
{
my $self = shift;
my ( $name ) = @_;
$self->write_line( "HELLO $name" );
}
This small example elides such details as error handling, which a real protocol implementation would be likely to contain.
DESCRIPTION EVENTS
The following events are invoked, either using subclass methods or CODE references in parameters:
on_read_line $line
Invoked when a new complete line of input is received.
PARAMETERS
The following named parameters may be passed to "new" or "configure":
on_read_line => CODE
CODE reference for the "on_read_line" event.
METHODS
$lineprotocol->write_line( $text )
Writes a line of text to the transport stream. The text will have the end-of-line marker appended to it; $text should not end with it.
AUTHOR
Paul Evans <leonerd@leonerd.org.uk>
perl v5.14.2 2012-10-24 IO::Async::Protocol::LineStream(3pm)