I know the feeling, yes, you are being lazy :)
IIRC, the perl function
sysopen can do this (create if it doesn't exist and open for read/write in one fell swoop or fail =>
sysopen FILEHANDLE, "filename", O_CREAT | O_RDWR or die "wah $!").
| MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!" |
| I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README). |
| ** The third rule of perl club is a statement of fact: pod is sexy. |