perl filename.pl
@pause