I do not really see what this all brings, I think I would prefer the two greps to the awk solutions, because they are easier to understand and thus to maintain. One could go even further and put everything in one awk:
Code:
awk '
NR==2,NR==10 {
if (/error/) {
if(/memory/) {
m=m RS $0
i++
}
else {
o=o RS $0
j++
}
}
}
END{
print i m RS j o
}
' file
This probably would make it more efficient, but one could ask if that is required and the down side is that it is also less simple...
--
Quote:
Originally Posted by bipinajith
[..] awk is glorified variant of grep. So yes it understands regex.
Hi
Maybe you can suggest a nicer way to do the following:
RET_STR=$(echo ${RET} | sed -e 's/0/Object is not mapped/' \
-e 's/1/Operation Internal Error/' \
-e 's/2/Operation Invalid Arguments/' \
-e 's/3/Object is mapped/' \
-e 's/4/Path not found/') (3 Replies)
Hi Guys,
I need to set the value of $7 to zero in case $7 is NULL. I've tried the below command but doesn't work. Any ideas. thanks guys.
MEM=`ps v $PPID| grep -i db2 | grep -v grep| awk '{ if ( $7 ~ " " ) { print 0 } else { print $7}}' `
Harby. (4 Replies)
Hello,
I trying to extract text that is surrounded by xml-tags. I tried this
cat tst.xml | egrep "<SERVER>.*</SERVER>" |sed -e "s/<SERVER>\(.*\)<\/SERVER>/\1/"|tr "|" " "
which works perfect, if the start-tag and the end-tag are in the same line, e.g.:
<tag1>Hello Linux-Users</tag1>
... (5 Replies)
Hi, all of you!!!
I have this code and I won to build-in some more code.
I know this is a lot of code.
if ; then
if ; then
SYSROOT="$1"
S_SCRIPT="cd $1 ; ./etc/rc.sysinit 2>&1 &"
fi
else
... (22 Replies)
Hi,
I'm using code below to assign title for Putty Window to show user@hostname+curr directory.
Trying to read this "write only" language, can anybody help me to go thru this string, too many thing in it I can't expaing
Tx
T
export PROMPT_COMMAND='echo -ne "\033]0;${USER}@${HOSTNAME}:... (1 Reply)
hi,
can someone tell me how can I translate the following line from sed to awk?
`sed 's/^*:*:*:*:*:\(*\):.*/\1/
How to use code tags when posting data and code samples. (14 Replies)
Hi,
I have a number of files containing the information below.
"""""
Fundallinfo
6.3950 14.9715 14.0482
"""""
I would like to grep for Fundallinfo and use it to read the next line? I ideally would like to read the three numbers that follow in the next line and... (2 Replies)
this code below is very useful in calculating mean and quartiles. however, i would really like to translate it to awk without having to write to any external file:
#!/bin/sh
filename="tmp.txt"
sort -n $1 >$filename
rows=`wc -l $filename|cut -d' ' -f1`
q2=`echo "($rows+1)/2" |bc`
... (3 Replies)
Discussion started by: SkySmart
3 Replies
LEARN ABOUT MOJAVE
english
English(3pm) Perl Programmers Reference Guide English(3pm)NAME
English - use nice English (or awk) names for ugly punctuation variables
SYNOPSIS
use English;
use English qw( -no_match_vars ) ; # Avoids regex performance penalty
# in perl 5.16 and earlier
...
if ($ERRNO =~ /denied/) { ... }
DESCRIPTION
This module provides aliases for the built-in variables whose names no one seems to like to read. Variables with side-effects which get
triggered just by accessing them (like $0) will still be affected.
For those variables that have an awk version, both long and short English alternatives are provided. For example, the $/ variable can be
referred to either $RS or $INPUT_RECORD_SEPARATOR if you are using the English module.
See perlvar for a complete list of these.
PERFORMANCE
NOTE: This was fixed in perl 5.20. Mentioning these three variables no longer makes a speed difference. This section still applies if
your code is to run on perl 5.18 or earlier.
This module can provoke sizeable inefficiencies for regular expressions, due to unfortunate implementation details. If performance matters
in your application and you don't need $PREMATCH, $MATCH, or $POSTMATCH, try doing
use English qw( -no_match_vars ) ;
. It is especially important to do this in modules to avoid penalizing all applications which use them.
perl v5.18.2 2014-01-06 English(3pm)
01-06-2013
