Hash in Subroutinen - #186297 (Allgemeines zu Perl)

Raubtier

2017-03-31 00:10

User since
2012-05-04
1054 Artikel
BenutzerIn

user image

Linuxer hat zwar eigentlich schon alles erklärt, aber damit die Antwort nicht untergeht, hier ein lauffähiges Beispiel, wo der Hash in der sub sowohl gelesen als auch geschrieben wird:

Code (perl): (dl )

#!/usr/bin/perl

use strict;
use warnings;
use Data::Dumper;

my %content = ( 'a' => 666, 'b' => 2);

print "Vorher:\n";
print Dumper \%content;

change_hash(\%content);

print "Nachher:\n";
print Dumper \%content;


sub change_hash {
    print "Bin im sub.\n";
    my $href = shift;
    print "Im sub: hash-wert von 'a' ist $href->{'a'} - aber nicht mehr lange...\n";
    $href->{'a'} = 42;
    $href->{'c'} = 7;
}