Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re: Trudging along the learning perl path.

by duyet (Friar)
on Apr 16, 2017 at 10:33 UTC ( #1188044=note: print w/replies, xml ) Need Help??

in reply to Trudging along the learning perl path.

use strict; use warnings; # CPAN packages use Data::Dumper; my @array = (29,24,0,24,24,12,0,10,10,19,17,15,13,1,12,12,24); my %hash1; # slice @hash1{@array} = undef; my @uniq1 = sort keys %hash1; print 'uniq1 = ' . Dumper \@uniq1; # map my %hash2 = map { $_ => 1 } @array; my @uniq2 = sort keys %hash2; print 'uniq2 = ' . Dumper \@uniq2;
uniq1 = [ '0', '1', '10', '12', '13', '15', '17', '19', '24', '29' ] same for uniq2

There are many ways to archive something with Perl, as Slices and map are shown above. And there are more as shown in other posts ...

As you are starting to learn Perl (and any other programming languages), it is always painfull in the beginning!!! Get a book, learn the basic, follow online tutorials, and keep execise ... and it will get easier and easier ...

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1188044]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (6)
As of 2020-09-25 15:20 GMT
Find Nodes?
    Voting Booth?
    If at first I donít succeed, I Ö

    Results (138 votes). Check out past polls.