Select Code to Download

    sub add ($$) {$_[0] + $_[1]}
    my @arr = (3, 4);
    print add(@arry);

    sleep 2.5;

$ perl -wle 'print+(localtime())[5]'
105