no strict && use stict;

use GCI;
print Sub('lita');

$letters = <NUT>;

eval('22');

$war{art};

bonus :
open(MIND,"/dev/null");