in reply to Re^2: How do I create a C-like struct with dynamic fields in Perl?
in thread How do I create a C-like struct with dynamic fields in Perl?
You'd need to take a reference (a hashref) to the %struct hash. E.g.
my %struct = (data => 1, pointers => []); my $struct_ref = \%struct;
Or, in a single step:
my $struct_ref = {data => 1, pointers => []};
Note the reference is a SCALAR value (uses $ sigil). There's nothing special about using these in an array:
my @array_of_structs = (\%struct1, $struct2_ref, {data => 1, pointers +=> []}); push @array_of_structs, \%new_struct;
Access the hash data like this:
my $first_data = $array_of_structs[0]{data}; push @{ $array_of_structs[2]{pointers} }, 'abc', 'def'; my $third_struct_second_pointer = $array_of_structs[2]{pointers}[1];
-- Ken
|
|---|