Use chmod in Perl

chmod(0777, "hohofiles") || print $!;

This will change the permissions of our directory hohofiles to 777.


-We called Perl's built-in chmod function.
-We set permissions to 777.
-We enclosed the name of the thing to be chmoded in quotation marks. This could have also included the path to hohofiles if it was in a different directory than our script.
-We included two vertical bars or pipes, which mean "or".
-We said to print any error we might receive. The errors are contained in the built-in variable $!

-Summary: chmod our directory or print errors.




Copy and Paste Perl Code:

#!/usr/bin/perl

print "Content-type:text/html\n\n";

chmod(0777, "hohofiles") || print $!;

print " -Done";

exit;



Resources:
Use the Perl PRINT FUNCTION
Making a Directory Using mkdir in Perl

Previous Article: Making a Directory Using mkdir in Perl

Next Article: Delete a File Using unlink in Perl