Select Code to Download

print $wfh if /\bterminal length\b/i .. /^\n*$/;

print $wfh $_ if /\bterminal length\b/i .. /^\n*$/;