silly@bluetit:~/perl/threads$ thread.pl
100
Thread Message is test1
1 2 3
Segmentation fault