Writes to the standard error file. : file write « File « Perl






  1. Perl
  2. File
  3. file write

Writes to the standard error file.

    
#!/usr/local/bin/perl 

open(MYFILE, "file1") || die ("Unable to open input file file1\n"); 
print STDERR ("File file1 opened successfully.\n"); 
$line = <MYFILE>; 
while ($line ne "") { 
   chop ($line); 
   print ("\U$line\E\n"); 
   $line = <MYFILE>; 
}








Related examples in the same category

1.Write array to a file
2.Write data to file
3.Write ten lines of text to a pipe
4.Write unpack data to a file
5.Save formatted data to a file
6.Save hash value to a file
7.Save new line character to a file
8.Save packed data to a file
9.Print data to a file
10.Copying files
11.File read and write
12.Merges two files.
13.Shuffle a file?
14.Sort a file
15.Creating a file with the numbers 0-9: +>