Perl-Zeitung Ausgabe 16 - #156205 (Perl: Community, Bücher, Neuigkeiten)

rosti

2012-02-17 13:10

User since
2011-03-19
3472 Artikel
BenutzerIn

Hi,

schön, dass es neben ungezählten Internetseiten auch die Print-Medien gibt.

Vielleicht ein klitzkleiner Vorschlag für ein Thema:
=== Richtig Referenzieren ===

Code (perl): (dl )

#!/usr/bin/perl

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

my $ref = {
        sig => \%SIG,
};

my $clone = $ref;  # Kopie der Referenz???
$clone = {};       # erwarte {} in $ref ...
print Dumper $ref; # Denkste! Alles noch da!

# Besser machen:
$clone = \$ref;    # Jetzt haben wir die richtige Kopie!!!
$$clone = {};      # und können den Inhalt des Original ändern
print Dumper $ref; # as expected