Chap Harrison wrote:
Well, I suppose I've missed a subtlety along the way here. I have two
directories:
/path/to/existing/directory/foo/
/path/to/existing/directory/bar/
And I want to archive these two directories into a zip file named
archive.zip.
Here's what I did, using the synopsis of Arc
Well, I suppose I've missed a subtlety along the way here. I have two
directories:
/path/to/existing/directory/foo/
/path/to/existing/directory/bar/
And I want to archive these two directories into a zip file named archive.zip.
Here's what I did, using the synopsis of Archive::Zip in CPAN as a
On Jun 2, 12:37 am, gk.kalipuray...@gmail.com (Gopal Karunakar) wrote:
> Hi All,
>
> I needed to find all the duplicate values in an array and their count of
> occurences. Any help would be appreciated .
>
See: perldoc -q dup
perldoc perlvar
Although even non-dup array members get printed
From: "Uri Guttman"
> > "JK" == Jenda Krynicky writes:
>
> JK> From: "Joseph L. Casale"
> >> Inside a here doc, how can I force an expression to be evaluated
> >> such as localtime:
>
> here docs are just a different form of string so any technique which
> works in quoted strings wil
>I needed to find all the duplicate values in an array and their count
of
>occurences. Any help would be appreciated .
You could use a hash:
use strict;
use warnings;
my @animals = ("cat","dog","wombat","cat","monkey","cat","monkey");
my %howmany;
foreach my $critter (@animals)
{
$howmany{$cr
Gopal Karunakar asked:
> I needed to find all the duplicate values in an array and their count
> of occurences. Any help would be appreciated .
#!/usr/bin/perl -w
use strict;
my @array=qw(foo baz bar foo baz foo);
my %seen;
foreach my $item (@array){
$seen{$item}++
}
foreach my $item (keys
Hi All,
I needed to find all the duplicate values in an array and their count of
occurences. Any help would be appreciated .
Thanks in advance.
