Select Code to Download

    #!/usr/bin/perl
    use utf8;
...
    $Clock->detach();

    sleep 3;

    programs implemented {0} sec
...
    programs implemented {3} sec
    this lock var has been change