Help for this page

Select Code to Download

Select or download this

%datastructure=(
  'foo' => [ 
...
             [ 'bar11', 'bar12' ]
           ]
);

Select or download this

$VAR1 = 'foo';
$VAR2 = [
...
            'bar12'
          ]
        ];

Select or download this

my @entry = shift(@{@datastructure{'foo'}});

Select or download this

$VAR1 = [
          'foo01',
          'foo02'
        ];

Select or download this
```
@my_list = ('foo01', 'foo02');
```
Select or download this
```
$VAR1 = 'foo01';
$VAR2 = 'foo02';
```
Select or download this
```
Dumper(@entry);
```

Select or download this

$VAR1 = [
          'foo01',
          'foo02'
        ];

Select or download this
```
Dumper(@entry->[0]);
```

Select or download this

$VAR1 = [
          'foo01',
          'foo02'
        ];

Select or download this
```
Dumper(@entry->[0]->[0]);
```
Select or download this
```
$VAR1 = 'foo01';
```