Làm cách nào để chờ nhấn phím trong tập lệnh perl?

Question

Tôi cố gắng để thực hiện một nhị phân bằng cách sử dụng lệnh sau:

system("update"); 

Sau khi thực hiện "cập nhật" lệnh, hệ thống sẽ nhắc những điều sau đây:

"Press ENTER to exit:" 

Làm thế nào để thực hiện nêu trên trong perl của tôi kịch bản?

Answer 1

use strict; 
use warnings; 

print "Press ENTER to exit:"; 
<STDIN>; 

Answer 2

#! usr/bin/perl 
print "How old are you?"; 
$age = <>; 
print "WOW! You are $age years old!";