Select Code to Download

#! perl -slw
use strict;
...
    sleep 1 while $running > 19;
    warn 'looping';
}

#! perl -slw
use strict;
...
}