Help for this page

Select Code to Download

Select or download this
```
...

...
package Main;

...
```
Select or download this
```
...

...
}

...
```

Select or download this

my $p1 = undef;
BEGIN
{
   $p1 = Problem->new('P11', 'P12', 'P13');
}