; title 'title'
;
print 'Enter title :' set gmtt = $_
title $gmtt *pl
