use strict;
use warnings;
print "Guess the Code:";
1 while <> != (1+int rand 10);
print "\n  Time taken to break the Code ..: ", time()-$^T, " seconds\n";