Geek Gadgets 1/ADE-1.bin/ade-bin/bin/pod2text

Text File | 1996-10-12 | 139 b | 13 lines

#!/ade/bin/perl
    eval 'exec perl -S $0 "$@"'
    if 0;

use Pod::Text;

if(@ARGV) {
    pod2text($ARGV[0]);
} else {
    pod2text("<&STDIN");
}