Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re^4: request for review: file reading security

by Chady (Priest)
on Sep 05, 2004 at 15:57 UTC ( #388623=note: print w/replies, xml ) Need Help??


in reply to Re^3: request for review: file reading security
in thread request for review: file reading security

His regular expression does the job well. It strips everything until the last /

$req = 'blah/../../topsecretpages/page.html'; $req =~ s/^.*\///; print $req; __END__ page.html

He who asks will be a fool for five minutes, but he who doesn't ask will remain a fool for life.
Chady | http://chady.net/
Are you a Linux user in Lebanon? join the Lebanese Linux User Group.