[pm-h] write to empty files

[rlharris at oplink.net]

On Fri, June 8, 2018 1:01 pm, Uri Guttman wrote:
> my @files = qw( foobar-01.tex foobar-02.tex foobar-03.tex) ;
>
> foreach my $tex_file ( @files ) {
>
>         write_file( $tex_file, "tex header\n" ) ;
> }

I may have as many as a thousand "foobar-xx.tex" files.  There must be
a way to give "my @files" the name of a file containing target
filenames.  Is this something covered in "Learning Perl" ?