You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
#!/usr/local/bin/perl
|
|
|
|
opendir(HOMEDIR, "/u/jqpublic") || die ("Unable to open directory");
|
|
@files = readdir(HOMEDIR);
|
|
closedir(HOMEDIR);
|
|
foreach $file (sort @files) {
|
|
print ("$file\n");
|
|
}
|
|
|
|
|