unless (open(MORE, " | more")) {
	die("ERROR! Cannot fork a process to \"more\" command\n");
}
print MORE "whatever\n";