Select Code to Download

Select or download this

15,10,name3
10,#####,name1
12,10,name2
5,12,name4
8,5,name4

Select or download this

my %data =
    (
...
    my $line = join("\t|||\t",@parent_list)."\n";
    print $line;
}

Select or download this

    E 
    F       |||     E 
...
    B       |||     F       |||     E
    D       |||     F       |||     E 
    A       |||     D       |||     F       |||     E

Select or download this

$VAR1 = {
          'A' => {
...
                     'data' => 15
             },
    }

Select or download this

$VAR1 = {
        '8' => {
...
                     'name' => 'full_D'
               },
    }

Select or download this

<id>,<parent>,<name>
5,###,full_A
8,5,full_B
9,5,full_C
10,8,full_D

Select or download this
```
A
B,A
C,B,A
```

Select or download this

$VAR1 = {
          '/perl/5.14.1/strict.pm' => {
...
                                    'data' => 2
                                  }
        };

Select or download this

$VAR1 = {
        '7299' => {
...
                    'name' => './hello_world.pl'
                  }
        };

Select or download this

./hello_world.pl
/perl/5.14.1/strict.pm,./hello_world.pl
...
./bye_world.pl,./hello_world.pl
some_text.txt,./hello_world.pl
some_text.txt,./bye_world.pl,./hello_world.pl

Select or download this

    <file1>,<chain-file(N-1)>,<chain-file(N-1)>,...,<chain-file1><br>