Hi ,
I am using SUN OS Version 5.6.
I have a file that contains records of length 270. when I do 'set nu' in vi editor, I get the count as 86. whereas when I do "wc -l" on the command prompt, it shows the count as only 85. this is very strange. why would the 'wc' show 1 record less. The job... (3 Replies)
Hi all,
I have a pattern like this in a file:
123 4 56 789
234 5 67 789
121 3 56 789
222 4 65 789
321 6 90 100
478 8 40 789
243 7 80 789
How can I count the number of occurences of '789' (4th column) in this set...?
Thanks for all your help!
K (7 Replies)
Hi all
Can anybody suggest me, how to get the count of digits in a word
I tried
WORD=abcd1234
echo $WORD | grep -oE ] | wc -l
4
It works in bash command line, but not in scripts :mad: (12 Replies)
I am a newbie in UNIX shell script and seeking help on this UNIX function. Please give me a hand. Thanks.
I have a large file. Named as 'MyFile'. It was tab-delmited. I am told to write a shell function that counts the number of occurrences of the ord “mysring” in the file 'MyFile'. (1 Reply)
im trying to count the number of occurences of column 2 value(starting from KKK*) of the below file, file.txt
using the code cat file.txt | awk ' BEGIN { print "Category Counts"} {FS=","} {NR > 2} { cats = cats + 1} END { for(c in cats) { print c, "=", cats} } '
but its returning as
... (6 Replies)
Hello world,
Can anybody tell me how to count how many times does a word repeat in a file? There have been many threads on this but they all are heavy loads of Scripting for a starter like me. :D
So, I sat down today and after some hours of reading man pages, I found a simple one-line... (18 Replies)
Hi Guys,
I have 2 files like below
file1
xx
yy
file2
b
yy
b2
xx
c1
yy
xx
yy
Now I want an idea which can count occurences of text from file1 and file2 so outbout would be kind of (9 Replies)
I have some files as shown below
GLL ALM 654-656 654 656
SEM LYG 655-657 655 657
SEM LYG 655-657 655 657
ALM LEG 656-658 656 658
ALM LEG 656-658 656 658
ALM LEG 656-658 656 658
LEG LEG 658-660 658 660
LEG LEG 658-660 658 660 The value of GLL is... (5 Replies)
Hi, I would like to count the number of ALA occurences without having them to be repeated. In the script I have written now it has 40 repetitions of ALA but it has to be 8. ALA is chosen as one of the 20 values it can have when the script asks for the input of AAA, which for this example is chosen... (7 Replies)
Discussion started by: Aurimas
7 Replies
LEARN ABOUT DEBIAN
mojo::collection
Mojo::Collection(3pm) User Contributed Perl Documentation Mojo::Collection(3pm)NAME
Mojo::Collection - Collection
SYNOPSIS
# Manipulate collections
use Mojo::Collection;
my $collection = Mojo::Collection->new(qw(just works));
unshift @$collection, 'it';
$collection->map(sub { ucfirst })->each(sub {
my ($word, $count) = @_;
say "$count: $word";
});
# Use the alternative constructor
use Mojo::Collection 'c';
c(qw(a b c))->join('/')->url_escape->say;
DESCRIPTION
Mojo::Collection is a container for collections.
FUNCTIONS
Mojo::Collection implements the following functions.
"c"
my $collection = c(1, 2, 3);
Construct a new Mojo::Collection object.
METHODS
Mojo::Collection implements the following methods.
"new"
my $collection = Mojo::Collection->new(1, 2, 3);
Construct a new Mojo::Collection object.
"each"
my @elements = $collection->each;
$collection = $collection->each(sub {...});
Evaluate closure for each element in collection.
$collection->each(sub {
my ($e, $count) = @_;
say "$count: $e";
});
"first"
my $first = $collection->first;
my $first = $collection->first(sub {...});
Evaluate closure for each element in collection and return the first one for which the closure returns true.
my $five = $collection->first(sub { $_ == 5 });
"grep"
my $new = $collection->grep(sub {...});
Evaluate closure for each element in collection and create a new collection with all elements for which the closure returned true.
my $interesting = $collection->grep(sub { /mojo/i });
"join"
my $stream = $collection->join("
");
Turn collection into Mojo::ByteStream.
$collection->join("
")->say;
"map"
my $new = $collection->map(sub {...});
Evaluate closure for each element in collection and create a new collection from the results.
my $doubled = $collection->map(sub { $_ * 2 });
"reverse"
my $new = $collection->reverse;
Create a new collection with all elements in reverse order.
"slice"
my $new = $collection->slice(4 .. 7);
Create a new collection with all selected elements.
"shuffle"
my $new = $collection->shuffle;
Create a new collection with all elements in random order.
"size"
my $size = $collection->size;
Number of elements in collection.
"sort"
my $new = $collection->sort;
my $new = $collection->sort(sub {...});
Sort elements based on return value of closure and create a new collection from the results.
my $insensitive = $collection->sort(sub { uc(shift) cmp uc(shift) });
SEE ALSO
Mojolicious, Mojolicious::Guides, <http://mojolicio.us>.
perl v5.14.2 2012-09-05 Mojo::Collection(3pm)