![]() |
![]()
| ![]() |
![]()
NAMEToader::findToaderDirs - Finds all Toader directories under a specified Toader directory. VERSIONVersion 0.1.0 SYNOPSISuse Toader::findToaderDirs; my $foo = Toader::findToaderDirs->new(); my @dirs=$foo->findToaderDirs($directory); if($foo->error){ warn('Error '.$foo->error.': '.$foo->errorString); }else{ print join("\n", @dirs)."\n"; } METHODSnewThis initiates the object. my $foo = Toader::findToaderDirs->new(); findToaderDirsThis returns all found Toader directories under the path. One argument is taken and it a Toader directory. The returned array will also include the one it started in. my @dirs=$foo->findToaderDirs($directory); if($foo->error){ warn('Error '.$foo->error.': '.$foo->errorString); }else{ print join("\n", @dirs)."\n"; } findToaderSubDirsThis lists all sub Toader directories under a specified Toader directory. This only returns the found directory names under the directory. my @sub=$foo->findToaderSubDirs($dir); if($foo->error){ warn('Error '.$foo->error.': '.$foo->errorString); }else{ print join("\n", @dirs)."\n"; } ERROR CODES1, noDirSpecifiedNo directory specified. 2, notAdirNot a directory. 3, notAtoaderDirNot a Toader directory. 4, isaToaderDirErroredToader::isaToaderDir->isaToaderDir errored. 5, rootIsAtoaderDir"/" is the directory and it appears to be a Toader directory. This is a major WTF and should not be even if '/.toader' exists. 6, dirOpenFailedCould not open one of the directories. AUTHORZane C. Bowers-Hadley, "<vvelox at vvelox.net>" BUGSPlease report any bugs or feature requests to "bug-toader at rt.cpan.org", or through the web interface at <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Toader>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. SUPPORTYou can find documentation for this module with the perldoc command. perldoc Toader::findToaderDirs You can also look for information at:
ACKNOWLEDGEMENTSLICENSE AND COPYRIGHTCopyright 2013 Zane C. Bowers-Hadley. This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License. See http://dev.perl.org/licenses/ for more information.
|