Select Code to Download

use Thread;
$thread = new Thread \&sub_name;

sub sub_name()
{
...
       sleep(1000);   
    }
}