which works but seems ugly. Is there a better way? i.e. is there a way to test the end of a string for all common dividers?open PUB_CAT, 'pub_cat.txt' or die "Can't open file: $!\n"; foreach (<PUB_CAT>) { local $/ = "\n"; chomp; local $/ = "\r"; chomp; print "(<br> $_)"; mkdir "../Online_Library/$_", 0777; }
In reply to Re: Re: mkdir mode troubles
by newatperl
in thread mkdir mode troubles
by newatperl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |