Hey guys, can someone help me with this script...
#!/bin/sh
dir=`pwd`
for i in *.f
do if
then M=`wc -l < ${i}
sed -e 's://.*::' < ${i} | \
(echo "//${i} -"$M ; cat - ) > $i.tmp
chmod 700 $i ; mv ${i}.tmp $i
... (6 Replies)
I am trying to create a script but it is giving me errors on Cygwin for the following script. Could someone tell me, what am I doing wrong?
choice=1000
echo "choice is $choice"
while ; do
echo "choice is $choice"
echo 'Please select your option:'
echo '1. Option 1'
echo '2. Option 2'... (3 Replies)
Hi,
I have this example script which gives error ": unexpected operator/operand". I need the '' brackets for operator precedence.
#!/bin/ksh
x="abc"
y="xyz"
z="123"
if -a
then
print "yes"
else
print "no"
fi
Thanks (2 Replies)
Hi
I've made a short script but it is not working. Can some pl. help me out in this?
./123.sh
#! /usr/bin/ksh
# for changing to this directory
cd /layered/relational/scripts
When I run the above scripts, it doesn't change to the above directory. I don't what is the problem? the... (2 Replies)
Hello all,
so this is a script i did for an assignement,
- first option greets the user according to the time after fetching his name
- second options isn't implemented
- third check the performance according to how many users are using the system
- creates a log of names, time and ip of the... (14 Replies)
Please see below mentioned my script ... it ran once without any issue .... then after it is not coming out .... please suggest what is wrong?
#!/bin/ksh
## if (( ${num_errors} > 0 ));
export ACULOG=/home/varshnes/input
export num_errors=10
**** Search for 'Start correcting roll up... (7 Replies)
Hi...
I am fed up in file handing with array for comparing....
1st I want save first 2 columns of file 1
I tried like this,,
{getline< "file1";ln=$1; lt=$2}then I read second file's 1st and 2nd column..and saved like this
and small calculation and initialization
var1 =$1
var2 =$2... (5 Replies)
Dear All
The following is part of my script:
echo ${myarray}
mytitle=`awk '{print substr(${myarray}, 0, length(${myarray})-4)}' /dev/null`
the echo ${myarray} works fine;
however, I keep getting following error for the mytitle=.. part:
awk: line 1: syntax error at or near {
awk: line... (3 Replies)
Hi ! all I am just trying to check range in my datafile
pls tell me why its resulting wrong
admin@IEEE:~/Desktop$ cat test.txt
0 28.4
5 28.4
10 28.4
15 28.5
20 28.5
25 28.6
30 28.6
35 28.7
40 28.7
45 28.7
50 28.8
55 28.8
60 28.8
65 28.1... (2 Replies)
Discussion started by: Akshay Hegde
2 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)