Estoy canalizando la salida de varios scripts. Uno de estos scripts genera una página HTML completa que mi script de perl procesa. Quiero poder colocar los 58K de texto completos en el script perl (que contendrá líneas nuevas, por supuesto).

Pensé que esto podría funcionar:

open(my $TTY, '<', '/dev/tty');

my $html_string= do { local( @ARGV, $/ ) = $TTY ; <> } ;

Pero simplemente no está haciendo lo que necesito. ¿Alguna sugerencia?