How to verify comma or question mark

Hi,

We have a Perl script to unpack files/directory.
Because we can not rename the name of files, so it might have comma or question mark in the file name, and makes our script failed.
In script we assign the file name to scalar, which not allowed comma or question mark sign.
The question is: how to make this signs available for the files name? I knew i can use regular expression, but still not working.
Any idea or redirection will be appreciated.

Thanks,

Find more posts tagged with

Comments

nipper

Your question is not very clear, so think about rephrasing it, maybe with sample input and output.

You may also look at: if (-e $somename)

You may need to trap the error (there are examples to do this) and then parse it.

Aleks

Your question is not very clear, so think about rephrasing it, maybe with sample input and output.

You may also look at: if (-e $somename)

You may need to trap the error (there are examples to do this) and then parse it.

The simple question comes down is how to make Perl to verify file name included comma or question mark sign?
Actually that is my question.

Thank you for your quick response.

Aleks

No, my reply was not clear.
We catch files from web, save as default name as it shows, then pass to our server by using Perl script.
So it is a chance that comma or question mark included in file name, but we can not change it.
Currently we failed on Perl script by the file name with comma or question mark.
How can i resolve this problem?

Thanks

nipper

have you tried using the normal open return ?

open (TEST, "$filename" ) || warn "cannot open $filename failed $! \n";

that will give an error but continue.

hostData.rptdesign

Adam Stoller

No, my reply was not clear.
We catch files from web, save as default name as it shows, then pass to our server by using Perl script.
So it is a chance that comma or question mark included in file name, but we can not change it.
Currently we failed on Perl script by the file name with comma or question mark.
How can i resolve this problem?

Thanks

What is the specific piece of code that is not working for you?
If you can provide sufficient context - you'll generally get better answers.

My guess - is that you want to make use of either quotemeta() or \Q...\E - but that's really a complete guess because I don't know the context.

Aleks

It is not Perl's fault.
Our Perl script is working fine, but next step which passes para to command line then run another software, can not pick comma inside of filename. This is why.

Thanks for all of your replying!

Agarwal

It is not Perl's fault.
Our Perl script is working fine, but next step which passes para to command line then run another software, can not pick comma inside of filename. This is why.

Thanks for all of your replying!

From what i have understood you can try the following regular expression :-

while ($string =~ m/pattern/g) {
# Your code goes here if your pattern is found in $string
}

Thanks
Akshat Agarwal

dazzlad

Can you just post the code please.

Migrateduser

Hi,

We have a Perl script to unpack files/directory.
Because we can not rename the name of files, so it might have comma or question mark in the file name, and makes our script failed.
In script we assign the file name to scalar, which not allowed comma or question mark sign.
The question is: how to make this signs available for the files name? I knew i can use regular expression, but still not working.
Any idea or redirection will be appreciated.

Thanks,

Have you tried to replace the characters with other characters which are are used in the code and replacing back those characters with ? or comma

moonkhanna

It is not Perl's fault.
Our Perl script is working fine, but next step which passes para to command line then run another software, can not pick comma inside of filename. This is why.

Thanks for all of your replying!

Aleks, since your issue is resolved, please close the thread