Help for this page

Select Code to Download

Select or download this
```
Variable "$lig" will not stay shared
```

Select or download this

sub one {
    my $x;
...
        print $x;
    }
}