P
Phred Phungus
My perfect sunday began with an Americano, 2 chocolate-glazed donuts,
and perl. That may sound very decadent, but that held me food-wise
until the Super Bowl.
I have a common problem that files tell my that I'm not allowed there.
If I recall my reading, I was referred to chmod(). I've looked at that
several times, and it doesn't seem to take, at least as a man page.
Does perl have a way to manipulate these file permissions?
dan@dan-desktop:~/source42$ perl t1.pl
t1.pl out b1.c~ t1.pl~ .. . b1.c
dan@dan-desktop:~/source42$ ./t1.pl
bash: ./t1.pl: Permission denied
dan@dan-desktop:~/source42$ cat t1.pl
#!/usr/bin/perl
opendir(THISDIR, ".") or die "tja $!";
@allfiles = readdir THISDIR;
closedir THISDIR;
print "@allfiles\n";
# perl t1.pl
dan@dan-desktop:~/source42$
and perl. That may sound very decadent, but that held me food-wise
until the Super Bowl.
I have a common problem that files tell my that I'm not allowed there.
If I recall my reading, I was referred to chmod(). I've looked at that
several times, and it doesn't seem to take, at least as a man page.
Does perl have a way to manipulate these file permissions?
dan@dan-desktop:~/source42$ perl t1.pl
t1.pl out b1.c~ t1.pl~ .. . b1.c
dan@dan-desktop:~/source42$ ./t1.pl
bash: ./t1.pl: Permission denied
dan@dan-desktop:~/source42$ cat t1.pl
#!/usr/bin/perl
opendir(THISDIR, ".") or die "tja $!";
@allfiles = readdir THISDIR;
closedir THISDIR;
print "@allfiles\n";
# perl t1.pl
dan@dan-desktop:~/source42$