>\W already includes period...  I think you meant:
 >
 >if ($fileName =~ /[^\w\.]/) {
 >  # bad, bad filename!
 >}

Yup. My bad. Code copied blindly.


--
Morbus Iff ( .sig on other machine. )
http://www.disobey.com/ && http://www.gamegrene.com/
"where's there's a will, there's a morbus ready to collect!"

Reply via email to