Select Code to Download

use 5.8.0;  # for open \$buf.
use strict;
...

print("\$stdout:\n");
print($stdout);