5 lines
101 B
Perl
5 lines
101 B
Perl
my %node = (
|
|
data => 'say what',
|
|
next => \%foo_node,
|
|
);
|
|
$node{next} = \%bar_node; # mutable
|