Question

Is there way to use the more command in a perl script? There is a file and I want to print its content, but since there are lots of lines I would like to print it with more . I tried putting more in backticks, but it didn’t work:

open(FILE,'/opt/myfile' ) or die("Could not open  file.");
`more /opt/myfile`;

Answer 1

Just use the system command:

system('more thefile');