Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Hash Refrence for memory optimization
use strict; use warnings; use Data::Dumper; my %hashTag; sub populate_hash { my ( $hashRef ) = @_; $hashRef->{$_} = $_ foreach ( 1..10 ); return $hashRef; } populate_hash(\%hashTag); print "[$_] -> $hashTag{$_}\n" foreach ( sort {$a<=>$b} keys %hashTag ); # print "[$_] -> $hashRef->{$_}\n" foreach ( reverse sort {$a<=>$b} keys %{$hashRef} );
run
|
edit
|
history
|
help
0
objetos
Hello
Perl
Quotes
hashes
Challenge 41 Task 1
Riyali-101738
FOP utilities
Hashes
Riyali-101738