10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
In all my Googling, this usually happens when someone is comparing a variable, and that variable is unset. That doesn't appear to be the case for me...
#!/bin/bash -x
while read line
do
f=$(echo $line | tr -s ' ' | cut -d' ' -f 3)
echo $f
if
then
echo "This... (2 Replies)
Discussion started by: jnojr
2 Replies
2. UNIX for Dummies Questions & Answers
Hi
I have problem with my script.
I dont now why but i don't change anything and script stop working.
this is my code:
#!/bin/sh
for i in `ps -A | grep pocron.sh | grep -v grep | awk '{print $2}'`
do
COUNT=$((COUNT+1))
done
ostatnie_wykonanie=`cat porader.log`... (1 Reply)
Discussion started by: fotex
1 Replies
3. UNIX for Dummies Questions & Answers
Hiya all,
Why do I get a :unary operator expected when I try to put a condition statement in my shell script (sh) like so and how to fix?
if ; then
echo "say hello"
else
echo "don't say hello"
fi
? It seems if the script receives an argument it works but if I don't put an... (4 Replies)
Discussion started by: cyberfrog
4 Replies
4. Shell Programming and Scripting
i=0
while
Shell script reports an error "unary operator expected" pointing the above line.
$i by default is 0 and holds integer value and $buf is also holding integer value.
Please can some one let me know what is missing.
Thanks. (1 Reply)
Discussion started by: sunrexstar
1 Replies
5. UNIX for Dummies Questions & Answers
I get the following error
./get_NE05: line 42:
while
do
echo ${STRING_NAME}
J=1
if ; then
EXT=0$I
else
EXT=$I
fi
while
do
echo $I-$J
#calculating last occurrence
OCCURRENCE=`grep -io "${STRING_NAME}"... (3 Replies)
Discussion started by: f_o_555
3 Replies
6. UNIX for Dummies Questions & Answers
find . -name "*.*"|xargs grep WT:DBF_WL>> $F
Wfexist=`cat $F|grep $i`
echo $Wfexist
if ;
then
echo $Wfexist
echo "Workflow Exist"
else
touch $O
chmod 777 $O
echo $Wfexist
echo $WfExist >> $O
fi
I am getting the error that -ne: unary operator expected in the line with red... (2 Replies)
Discussion started by: ritu.s
2 Replies
7. Shell Programming and Scripting
Hello all, :confused:
I am not getting this error.
Pls help me.
./construct_operon.sh: line 5:
#!/bin/bash
# Construct Operons using gene pairs.
rm -rf operons_result
lines=`awk 'END {print NR}' ecoli_operons`
while ;
do
head -1 ecoli_operons | awk '{print $1"\n"$2}' > pattern
... (5 Replies)
Discussion started by: admax
5 Replies
8. Shell Programming and Scripting
Im trying to fix my /etc/weekly that rotates various logs however it does them no matter what filesize they are and i want them to only do it if there file size exceeds 2M or something. So I'm playing with a script to get the filesize using a ls -l command which works and puts the value into a... (3 Replies)
Discussion started by: timgolding
3 Replies
9. Shell Programming and Scripting
hi
i am trying to compare a value with value 50. but i am getting
"
I am using
if
then
echo "------------"
fi
please help
thanks in advance
Satya (2 Replies)
Discussion started by: Satyak
2 Replies
10. UNIX for Dummies Questions & Answers
Hi
I am doing a script like
if
then
echo "table name dosent exist"
exit
fi
the problem is if $table_name is null then i am getting the error
Please help me
Thanks in advance (2 Replies)
Discussion started by: ssuresh1999
2 Replies
Ops(3) User Contributed Perl Documentation Ops(3)
NAME
PDL::Ops - Fundamental mathematical operators
DESCRIPTION
This module provides the functions used by PDL to overload the basic mathematical operators ("+ - / *" etc.) and functions ("sin sqrt"
etc.)
It also includes the function "log10", which should be a perl function so that we can overload it!
SYNOPSIS
none
FUNCTIONS
plus
Signature: (a(); b(); [o]c(); int swap)
add two piddles
$c = plus $a, $b, 0; # explicit call with trailing 0
$c = $a + $b; # overloaded call
$a->inplace->plus($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "+" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
mult
Signature: (a(); b(); [o]c(); int swap)
multiply two piddles
$c = mult $a, $b, 0; # explicit call with trailing 0
$c = $a * $b; # overloaded call
$a->inplace->mult($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "*" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
minus
Signature: (a(); b(); [o]c(); int swap)
subtract two piddles
$c = minus $a, $b, 0; # explicit call with trailing 0
$c = $a - $b; # overloaded call
$a->inplace->minus($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "-" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
divide
Signature: (a(); b(); [o]c(); int swap)
divide two piddles
$c = divide $a, $b, 0; # explicit call with trailing 0
$c = $a / $b; # overloaded call
$a->inplace->divide($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "/" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
gt
Signature: (a(); b(); [o]c(); int swap)
the binary > (greater than) operation
$c = gt $a, $b, 0; # explicit call with trailing 0
$c = $a > $b; # overloaded call
$a->inplace->gt($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary ">" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
lt
Signature: (a(); b(); [o]c(); int swap)
the binary < (less than) operation
$c = lt $a, $b, 0; # explicit call with trailing 0
$c = $a < $b; # overloaded call
$a->inplace->lt($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "<" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
le
Signature: (a(); b(); [o]c(); int swap)
the binary <= (less equal) operation
$c = le $a, $b, 0; # explicit call with trailing 0
$c = $a <= $b; # overloaded call
$a->inplace->le($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "<=" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
ge
Signature: (a(); b(); [o]c(); int swap)
the binary >= (greater equal) operation
$c = ge $a, $b, 0; # explicit call with trailing 0
$c = $a >= $b; # overloaded call
$a->inplace->ge($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary ">=" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
eq
Signature: (a(); b(); [o]c(); int swap)
binary equal to operation ("==")
$c = eq $a, $b, 0; # explicit call with trailing 0
$c = $a == $b; # overloaded call
$a->inplace->eq($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "==" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
ne
Signature: (a(); b(); [o]c(); int swap)
binary not equal to operation ("!=")
$c = ne $a, $b, 0; # explicit call with trailing 0
$c = $a != $b; # overloaded call
$a->inplace->ne($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "!=" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
shiftleft
Signature: (a(); b(); [o]c(); int swap)
leftshift "a$" by $b
$c = shiftleft $a, $b, 0; # explicit call with trailing 0
$c = $a << $b; # overloaded call
$a->inplace->shiftleft($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "<<" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
shiftright
Signature: (a(); b(); [o]c(); int swap)
leftshift "a$" by $b
$c = shiftright $a, $b, 0; # explicit call with trailing 0
$c = $a >> $b; # overloaded call
$a->inplace->shiftright($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary ">>" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
or2
Signature: (a(); b(); [o]c(); int swap)
binary or of two piddles
$c = or2 $a, $b, 0; # explicit call with trailing 0
$c = $a | $b; # overloaded call
$a->inplace->or2($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "|" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
and2
Signature: (a(); b(); [o]c(); int swap)
binary and of two piddles
$c = and2 $a, $b, 0; # explicit call with trailing 0
$c = $a & $b; # overloaded call
$a->inplace->and2($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "&" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
xor
Signature: (a(); b(); [o]c(); int swap)
binary exclusive or of two piddles
$c = xor $a, $b, 0; # explicit call with trailing 0
$c = $a ^ $b; # overloaded call
$a->inplace->xor($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "^" operator. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
bitnot
Signature: (a(); [o]b())
unary bit negation
$b = ~ $a;
$a->inplace->bitnot; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "~" operator/function.
power
Signature: (a(); b(); [o]c(); int swap)
raise piddle $a to the power "b"
$c = $a->power($b,0); # explicit function call
$c = $a ** $b; # overloaded use
$a->inplace->power($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "**" function. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
atan2
Signature: (a(); b(); [o]c(); int swap)
elementwise "atan2" of two piddles
$c = $a->atan2($b,0); # explicit function call
$c = atan2 $a, $b; # overloaded use
$a->inplace->atan2($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "atan2" function. Note that
when calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restric-
tion is expected to go away in future releases.
modulo
Signature: (a(); b(); [o]c(); int swap)
elementwise "modulo" operation
$c = $a->modulo($b,0); # explicit function call
$c = $a % $b; # overloaded use
$a->inplace->modulo($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "%" function. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
spaceship
Signature: (a(); b(); [o]c(); int swap)
elementwise "~" operation
$c = $a->spaceship($b,0); # explicit function call
$c = $a <=> $b; # overloaded use
$a->inplace->spaceship($b,0); # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the binary "<=>" function. Note that when
calling this function explicitly you need to supply a third argument that should generally be zero (see first example). This restriction
is expected to go away in future releases.
sqrt
Signature: (a(); [o]b())
elementwise square root
$b = sqrt $a;
$a->inplace->sqrt; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "sqrt" operator/function.
abs
Signature: (a(); [o]b())
elementwise absolute value
$b = abs $a;
$a->inplace->abs; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "abs" operator/function.
sin
Signature: (a(); [o]b())
the sin function
$b = sin $a;
$a->inplace->sin; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "sin" operator/function.
cos
Signature: (a(); [o]b())
the cos function
$b = cos $a;
$a->inplace->cos; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "cos" operator/function.
not
Signature: (a(); [o]b())
the elementwise not operation
$b = ! $a;
$a->inplace->not; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "!" operator/function.
exp
Signature: (a(); [o]b())
the exponential function
$b = exp $a;
$a->inplace->exp; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "exp" operator/function.
log
Signature: (a(); [o]b())
the natural logarithm
$b = log $a;
$a->inplace->log; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "log" operator/function.
log10
Signature: (a(); [o]b())
the base 10 logarithm
$b = log10 $a;
$a->inplace->log10; # modify $a inplace
It can be made to work inplace with the "$a->inplace" syntax. This function is used to overload the unary "log10" operator/function.
assgn
Signature: (a(); [o]b())
Plain numerical assignment. This is used to implement the ".=" operator
AUTHOR
Tuomas J. Lukka (lukka@fas.harvard.edu), Karl Glazebrook (kgb@aaoepp.aao.gov.au), Doug Hunt (dhunt@ucar.edu), Christian Soeller
(c.soeller@auckland.ac.nz), Doug Burke (burke@ifa.hawaii.edu), and Craig DeForest (deforest@boulder.swri.edu).
perl v5.8.0 2003-01-29 Ops(3)