Select Code to Download

use Script::Singleton;

use Script::Singleton glue => 'UNIQUE GLUE STRING';

use warnings;
use strict;
...
use Script::Singleton warn => 1;

sleep 5;