PHP Classes

File: application/libraries/dompdf/lib/ttf2ufm/src/scripts/inst_dir

Recommend this page to a friend!
  Classes of harold rita   PHP Thesis Proposal Hub   application/libraries/dompdf/lib/ttf2ufm/src/scripts/inst_dir   Download  
File: application/libraries/dompdf/lib/ttf2ufm/src/scripts/inst_dir
Role: Auxiliary data
Content type: text/plain
Description: Auxiliary data
Class: PHP Thesis Proposal Hub
Store and publish research thesis documents
Author: By
Last change:
Date: 6 years ago
Size: 842 bytes
 

Contents

Class file image Download
#!/usr/bin/perl # # Script to create a directory for installation # # (c) 2000 by The TTF2PT1 Project # See COPYRIGHT for full license # if( $#ARGV!=0 && $#ARGV !=3) { die "Use: $0 dir-name [owner group mode]\n" } if( $#ARGV==3 ) { $owner = $ARGV[1]; $group = $ARGV[2]; eval "\$mode = 0$ARGV[3];"; } else { $owner = "root"; $group = "bin"; $mode = 0755; } @sl = split(/\//, $ARGV[0]); $prefix = shift(@sl); if($prefix eq "") { $prefix = "/" . shift(@sl); } while(1) { if( ! -d "$prefix" ) { die "Unable to create directory $prefix:\n$!\n" unless mkdir($prefix, $mode); die "Unable to change owner of $prefix to $owner\n" if system("chown $owner $prefix"); die "Unable to change group of $prefix to $group\n" if system("chgrp $group $prefix"); } if($#sl < 0) { last; } $prefix .= "/" . shift(@sl); } exit(0);