Jasmine
Administrator
Jan 26, 2001, 10:21 AM
Post #1 of 1
(2560 views)
|
|
How can I open a file with a leading "żçô¾" or tr
|
Can't Post
|
|
(From the Perl FAQ)
How can I open a file with a leading "żçô¾" or trailing blanks?
Normally perl ignores trailing blanks in filenames, and interprets certain leading characters (or a trailing ``|'') to mean something special. To avoid this, you might want to use a routine like this. It makes incomplete pathnames into explicit relative ones, and tacks a trailing null byte on the name to make perl leave it alone: sub safe_filename {
local $_ = shift;
return m#^/#
? "$_\0"
: "./$_\0";
}
$fn = safe_filename("<<<something really wicked ");
open(FH, "> $fn") or "couldn't open $fn: $!";
|
MAIN
SEARCH
WHO'S 
LOG 