- or download this
package My::ThereCanBeOnlyOne;
use strict;
...
}
1;
- or download this
use My::ThereCanBeOnlyOne 'myprogram';
- or download this
use My::ThereCanBeOnlyOne 'myprogram',
-hold => 0,
-stale => 1,
-max => 1;
- or download this
use My::ThereCanBeOnlyOne 'myprogram'.int(rand(6));