for my number (0 ..3))
{
    my $thr = threads->create (
                sub {
                   my $numberPassedIn = shift;
                   worker();
                    }, $number                
                 )->detach();
}