Hi,
I need some help.
Shell script counter. i need to add condition to check if counter is more than 10 and longer than 3 hours? it runs every 5 mins. it only check count and send email right now.
it runs in cron as below
gregcount.ksh gregdb 10 > /tmp/gregcount.out 2> /tmp/gregcount.err
... (1 Reply)
Hi,
I have such an example(ksh):
name1=Example
directory=/directory1/Example/directory2
match=$(grep -s '$name1' $directory | wc -l)
echo $match
But it replies to me:
0
What I expect from it, is to find $name1 in $directory and produce 1 for me as true, not false. (3 Replies)
Dear all,
I have numerous dat files (a.dat, b.dat...) containing 500 numeric values each. I would like to count them, based on their range and obtain a histogram or a counter.
INPUT:
a.dat
1.3
2.16
0.34
......
b.dat
1.54
0.94
3.13
.....
... (2 Replies)
cat sport_by_month
Month : Jan
sport :Football
sport :Volleyball
Month: Feb
sport :BasketBall
sport: Cricket
sport: Fotball
Month: Mar
Month: APR
sport : Bowling
sport : Climbing
I need your help to have a script that count the number of sports per month and sorted by mont with... (7 Replies)
i having a file
xxxxxxxxxxxxxxx1234 ...........value can be change
xxxxxxxxxxxxxxx1235
xxxxxxxxxxxxxxxx1236
.
.
.
.
xxxxxxxxxxxxxxxxx1300 ...........value can be change
i want to cut last four characters of first line and last line and find the missing pattern.
output should... (4 Replies)
I have this file
1801,A1,2012-12-16 15:59:59.995,id2_3,ab,phoneC2-00,VOE,,,,,,,,,,,,,,,
1802,A1,2012-12-16 15:59:59.995,id2_3,ab=,phoneX1-01,BL,,,,,,,,,,,,,,,
1803,A1,2012-12-16 15:59:59.995,id2_3,ab,phone300,BL,,,,,,,,,,,,,,,
1804,A1,2012-12-16... (4 Replies)
For the following code
SEQ=200
awk -v S="$SEQ" '
$0 ~ S {
N++
print N
}
' "$1"ascii >"$1"search
N is printed 8002 times as it occurred 8002 times in file
how I could print the counter one time only (20 Replies)
hello
this script should show all users and space they used without problem :
ls /home >> /root/users.txt
cat /root/users.txt | while read line; do
space=`du -s /home/$line`
echo "$line space is $space"
shift
done
but when i remove pipe ,script run without any output:
ls /home... (4 Replies)
Discussion started by: nimafire
4 Replies
LEARN ABOUT MOJAVE
moose::meta::attribute::native::trait::counter
Moose::Meta::Attribute::Native::Trait::Counter(3) User Contributed Perl Documentation Moose::Meta::Attribute::Native::Trait::Counter(3)NAME
Moose::Meta::Attribute::Native::Trait::Counter - Helper trait for Int attributes which represent counters
VERSION
version 2.1202
SYNOPSIS
package MyHomePage;
use Moose;
has 'counter' => (
traits => ['Counter'],
is => 'ro',
isa => 'Num',
default => 0,
handles => {
inc_counter => 'inc',
dec_counter => 'dec',
reset_counter => 'reset',
},
);
my $page = MyHomePage->new();
$page->inc_counter; # same as $page->counter( $page->counter + 1 );
$page->dec_counter; # same as $page->counter( $page->counter - 1 );
my $count_by_twos = 2;
$page->inc_counter($count_by_twos);
DESCRIPTION
This trait provides native delegation methods for counters. A counter can be any sort of number (integer or not). The delegation methods
allow you to increment, decrement, or reset the value.
DEFAULT TYPE
If you don't provide an "isa" value for your attribute, it will default to "Num".
PROVIDED METHODS
o set($value)
Sets the counter to the specified value and returns the new value.
This method requires a single argument.
o inc
o inc($arg)
Increases the attribute value by the amount of the argument, or by 1 if no argument is given. This method returns the new value.
This method accepts a single argument.
o dec
o dec($arg)
Decreases the attribute value by the amount of the argument, or by 1 if no argument is given. This method returns the new value.
This method accepts a single argument.
o reset
Resets the value stored in this slot to its default value, and returns the new value.
BUGS
See "BUGS" in Moose for details on reporting bugs.
AUTHORS
o Stevan Little <stevan.little@iinteractive.com>
o Dave Rolsky <autarch@urth.org>
o Jesse Luehrs <doy@tozt.net>
o Shawn M Moore <code@sartak.org>
o XXXX XXX'XX (Yuval Kogman) <nothingmuch@woobling.org>
o Karen Etheridge <ether@cpan.org>
o Florian Ragwitz <rafl@debian.org>
o Hans Dieter Pearcey <hdp@weftsoar.net>
o Chris Prather <chris@prather.org>
o Matt S Trout <mst@shadowcat.co.uk>
COPYRIGHT AND LICENSE
This software is copyright (c) 2006 by Infinity Interactive, Inc..
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
perl v5.18.2 2014-01-19 Moose::Meta::Attribute::Native::Trait::Counter(3)