Urgent
File contains: baba¦kkek¦aklk¦¦¦
bnbnbn¦vmvm¦
File name: Openfile
I want to find number of pipe(¦) symbols in a file(count).That is total count of pipes in a file or a line.
I dont want number of line it occurs. (4 Replies)
Hi, I'm very new to scripting.
grep $s $filename | awk '{print $2}' | cut -c 1-8
How can I optimize this using a single awk?
I tried:
awk '/$s/ {print $2}' $filename | cut -c 1-8
However didn't work, I think the awk is not recognizing $s and the verbal is something else. (6 Replies)
I have grep MHz psrinfo-v.out
it gives
The i386 processor operates at 3000 MHz,
The i386 processor operates at 3000 MHz,
The i386 processor operates at 3000 MHz,
The i386 processor operates at 3000 MHz,
how to get instead of these 4 lines:
CPU speed: 3000 MHz
i.e. CPU... (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)
This may just be a lack of experience talking, but I always assumed that when possible it was better to use a commands built in abilities rather than to pipe to a bunch of commands. I wrote a (very simple) script a while back that was meant to pull out a certain error code, and report back what... (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,
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)
Hi ,
I have a file where i have modifed certain things compared to original file . The difference of the original file and modified file is as follows.
# diff mir_lex.c.modified mir_lex.c.orig
3209c3209
< if(yy_current_buffer -> yy_is_our_buffer == 0) {
---
>... (5 Replies)
Hi Guys.
I am trying to count occurances of patterns(occurance can be anywhere in file2) from file1 in file2.
file1 is
god
god
pod
rod
file2 is
iamgod
iamgod
podrod
123rod456
output should be
god 2
god 2
pod 1
rod 2
I am not good at awk but i figured out this command.it doesnt... (7 Replies)
Discussion started by: ahfze
7 Replies
LEARN ABOUT DEBIAN
statistics::basic::mode
Statistics::Basic::Mode(3pm) User Contributed Perl Documentation Statistics::Basic::Mode(3pm)NAME
Statistics::Basic::Mode - find the mode of a list
SYNOPSIS
Invoke it this way:
my $mode = mode(1,2,3,3);
Or this way:
my $v1 = vector(1,2,3,3);
my $mod = mode($v1);
And then either query the values or print them like so:
print "The mod of $v1: $mod
";
my $mq = $mod->query;
my $m0 = 0+$mod; # this will croak occasionally, see below
The mode of an array is not necessarily a scalar. The mode of this vector is a vector:
my $mod = mode(1,2,3);
my $v2 = $mod->query;
print "hrm, there's three elements in this mode: $mod
"
if $mod->is_multimodal;
Create a 20 point "moving" mode like so:
use Statistics::Basic qw(:all nofill);
my $sth = $dbh->prepare("select col1 from data where something");
my $len = 20;
my $mod = mode()->set_size($len);
$sth->execute or die $dbh->errstr;
$sth->bind_columns( my $val ) or die $dbh->errstr;
while( $sth->fetch ) {
$mod->insert( $val );
if( defined( my $m = $mod->query ) ) {
print "Mode: $m
";
}
print "Mode: $mod
" if $mod->query_filled;
}
METHODS
new()
The constructor takes a list of values, a single array ref, or a single Statistics::Basic::Vector as arguments. It returns a
Statistics::Basic::Mode object.
Note: normally you'd use the mean() constructor, rather than building these by hand using "new()".
is_multimodal()
Statistics::Basic::Mode objects sometimes return Statistics::Basic::Vector objects instead of numbers. When "is_multimodal()" is true,
the mode is a vector, not a scalar.
_OVB::import()
This module also inherits all the overloads and methods from Statistics::Basic::_OneVectorBase.
OVERLOADS
This object is overloaded. It tries to return an appropriate string for the calculation or the value of the computation in numeric
context.
In boolean context, this object is always true (even when empty).
If evaluated as a string, Statistics::Basic::Mode will try to format a number (like any other Statistics::Basic object), but if the object
"is_multimodal()", it will instead return a Statistics::Basic::Vector for stringification.
$x = mode(1,2,3);
$y = mode(1,2,2);
print "$x, $y
"; # prints: [1, 2, 3], 2
If evaluated as a number, a Statistics::Basic::Mode will raise an error when the object "is_multimodal()".
AUTHOR
Paul Miller "<jettero@cpan.org>"
COPYRIGHT
Copyright 2012 Paul Miller -- Licensed under the LGPL
SEE ALSO perl(1), Statistics::Basic, Statistics::Basic::_OneVectorBase, Statistics::Basic::Vector
perl v5.14.2 2012-01-23 Statistics::Basic::Mode(3pm)