#!/usr/bin/perl -w

use strict;
use Thread;

my $var = 10;