Mail Archives: cygwin/2006/02/15/10:20:28
<http://cygwin.com/acronyms/#PPIOSPE>. Redirected to the list.
On Wed, 15 Feb 2006, Lennart Borgman wrote:
> Igor Peshansky wrote:
> > > Thanks Dave, but what would "chmod +x" be in perl? Is there an easy
> > > way to do it? (Hope this is not too much OT, it is clearly useful
> > > here.)
> >
> > "perldoc -f chmod".
> > Igor
>
> Yes, but it does not know the +x syntax.
Not that particular syntax (hey, you can always 'system("chmod +x $f")'),
but it does allow Fcntl constants (e.g., 'chmod
S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH $f' -- still from the above
perldoc page), and it uses the same octal mode values as the command-line
chmod (see "man chmod"). If you want to add the executable bits for
everyone, something like 'chmod 0111|((stat $f)[2]&07777), $f' should
work.
None of this is Cygwin-specific.
Igor
--
http://cs.nyu.edu/~pechtcha/
|\ _,,,---,,_ pechtcha AT cs DOT nyu DOT edu | igor AT watson DOT ibm DOT com
ZZZzz /,`.-'`' -. ;-;;,_ Igor Peshansky, Ph.D. (name changed!)
|,4- ) )-,_. ,\ ( `'-' old name: Igor Pechtchanski
'---''(_/--' `-'\_) fL a.k.a JaguaR-R-R-r-r-r-.-.-. Meow!
"Las! je suis sot... -Mais non, tu ne l'es pas, puisque tu t'en rends compte."
"But no -- you are no fool; you call yourself a fool, there's proof enough in
that!" -- Rostand, "Cyrano de Bergerac"
--
Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple
Problem reports: http://cygwin.com/problems.html
Documentation: http://cygwin.com/docs.html
FAQ: http://cygwin.com/faq/
- Raw text -