Opening filenames with special characters

Zadeh has asked for the wisdom of the Perl Monks concerning the following question:

Hi, I can't seem to figure out a way to open filenames with the '*' character in it. I have a general subroutine that looks like so:

sub blah {
  my $file = shift;
...
  my $retval = open(FHANDLE, $file);
...
}
[download]

But that always fails. I've also tried using e.g.:

my $retval = sysopen(FHANDLE, $file, O_RDONLY);
[download]

But that also fails. Is there any way to do this?

(And please don't ask me why I'd want to do this, or if I can just not do it, etc. Yes I really do, and I don't know why some users/software creates such horridly named files, but I have to process them nonetheless. :))

Comment on Opening filenames with special characters Select or Download Code

Replies are listed 'Best First'.
Re: Opening filenames with special characters by kyle (Abbot) on Mar 12, 2007 at 17:31 UTC
I think your code should work as-is. Maybe the problem is in some other part of it? If your open fails, be sure to print `$!` to find out why. `open my $fhandle, '<', 'foobar' or die "Can't read foobar: $!";` [download]	[reply] [d/l] [select]
Re^2: Opening filenames with special characters by Zadeh (Beadle) on Mar 14, 2007 at 17:13 UTC
Thanks, It turns out the problem was specific to windows and the MVFS filesystem provided by ClearCase from IBM/Rational. The same filesystem viewed from nix coincidentally doesn't have the problem when using sysopen()...ugh It also turned out that any other piece of software couldn't open these same kind of files with a '' in it in windows/MVFS, and the error message from $! was something like "Invalid filename". Copying the file to a different filesystem like NTFS worked fine. Hope this obscure problem happens to someone out there at some point..	[reply]
Re^3: Opening filenames with special characters by ikegami (Patriarch) on Mar 14, 2007 at 17:54 UTC
aye, `\/:*?"<>\|` are not valid characters in Windows file names.	[reply] [d/l]
Re: Opening filenames with special characters by Joost (Canon) on Mar 12, 2007 at 17:37 UTC
As stated above, that should just work, but if you're supplying the file name on the command line be aware that (on unix at least) the shell will also interpret wildcards before your code will ever see them. In other words; make sure $file contains exactly what you think it contains. "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply]
Re: Opening filenames with special characters by shandor (Monk) on Mar 12, 2007 at 18:02 UTC
If you're using a shell command (in system() or ``'s) to get the file name, don't forget to chomp the output. You might have a \n on there. Another thing I do when working with strange characters is output the variable and run it through od -c (on a Unix system) to see if some hidden characters are hiding from me.	[reply]
Re: Opening filenames with special characters by whereiskurt (Friar) on Mar 12, 2007 at 19:49 UTC
I've started to using this pragma at the top of my scripts: `use Fatal qw( open close );` [download] Basically the functions listed will now throw exceptions when they fail (use eval {}), instead of setting failure values and returning false. Fatal is part of the standard Perl modules. I learned this in 'Perl Best Practices' -- best book ever. Damian Conway, if you ever read this, I love you in a purely technosexual way. :) KPH	[reply] [d/l]
Re^2: Opening filenames with special characters by TheDamian (Vicar) on Mar 12, 2007 at 21:34 UTC
`use 6; return all('thanks', 'appreciation') but ETOOMUCHINFO;` [download] ;-)	[reply] [d/l]
Re^2: Opening filenames with special characters by diotalevi (Canon) on Mar 12, 2007 at 23:24 UTC
If you're checking for failure on close() because you write to stuff, you ought to be checking for failure on write as well. Typically that might be print() or die. ⠤⠤ ⠙⠊⠕⠞⠁⠇⠑⠧⠊	[reply]
Re: Opening filenames with special characters by ferreira (Chaplain) on Mar 13, 2007 at 02:31 UTC
Hi, I can't seem to figure out a way to open filenames with the '*' character in it. As a very immediate way to figure that out, I would suggest reading the open man page. It will tell you how magic 2-arg open is and how 3-arg open is just what you want. `open FHANDLE, '<', $file # handle anything your OS can or die "can't open $file: $!";` [download]	[reply] [d/l]


The stupid question is the question not asked
	PerlMonks