When you open a file in Perl, you should ALWAYS check the return status to see if your open function worked. If it can't open the file you've requested it won't print out an error - the failure is silent unless you check for it.

Thus:

open (FH,"abc.txt") or die ("Cannot open abc.txt\n");
Perl will fail to open a file for read if the file does not exist, or if the file is not readable by the user requesting it

open (FH,">abc.txt") or die ("Cannot open abc.txt\n");
Perl will fail to open a file for write if the user running the Perl program does not have appropiate write permissions. A file can be opened for write whether or not it already exists; if it does exist the open statement shown will cause the existing content to be deleted.
(written 2006-02-23, updated 2006-06-05)

 P207 - Perl - File Handling
  [12] How many people in a room? - (2004-08-12)
  [114] Relative or absolute milkman - (2004-11-10)
  [255] STDIN, STDOUT, STDERR and DATA - Perl file handles - (2005-03-23)
  [616] printf - a flawed but useful function - (2006-02-22)
  [702] Iterators - expressions tha change each time you call them - (2006-04-27)
  [867] Being sure to be positive in Perl - (2006-09-15)
  [1312] Some one line Perl tips and techniques - (2007-08-21)
  [1416] Good, steady, simple example - Perl file handling - (2007-10-30)
  [1442] Reading a file multiple times - file pointers - (2007-11-23)
  [1467] stdout v stderr (Tcl, Perl, Shell) - (2007-12-10)
  [1709] There is more that one way - Perl - (2008-07-14)
  [1841] Formatting with a leading + / Lua and Perl - (2008-10-15)
  [1860] Seven new intermediate Perl examples - (2008-10-30)
  [1861] Reactive (dynamic) formatting in Perl - (2008-10-31)
  [2233] Transforming data in Perl using lists of lists and hashes of hashes - (2009-06-12)
  [2405] But I am reading from a file - no need to prompt (Perl) - (2009-09-14)
  [2818] File open and read in Perl - modernisation - (2010-06-19)
  [2821] Chancellor George Osborne inspires Perl Program - (2010-06-22)
  [2833] Fresh Perl Teaching Examples - part 2 of 3 - (2010-06-27)
  [3326] Finding your big files in Perl - design considerations beyond the course environment - (2011-06-14)
  [3548] Dark mornings, dog update, and Python and Lua courses before Christmas - (2011-12-10)
  [3830] Traversing a directory in Perl - (2012-08-08)
  [3839] Spraying data from one incoming to series of outgoing files in Perl - (2012-08-15)

Back to Easy, Free, Reliable internet access

Previous and next or Horse's mouth home

Forward to If its Sunday, it must be the Norland

Queues and barrel rolls in Perl
And the staff put the icing on the cake
Familiar names, close to home
If its Sunday, it must be the Norland
Perl - its up to YOU to check your file opened
Easy, Free, Reliable internet access
Looking for leading not bleeding edge
News in Ireland
Greetings from Dublin