Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...
    @subs = qw| 2 3 4 5 |;
    return (  \@subs, \$sbscrpId );
}

Select or download this
```
No of subs : 4 and subs are 2 3 4 5
```