Help for this page
sub open_new { my ( $filename ) = @_; ... push @filestack, open_new( 'test1.txt' ); push @filestack, open_new( 'test2.txt' );