Current Path : /proc/2/root/usr/local/ssl/share/perl5/CGI/examples/ |
Current File : //proc/2/root/usr/local/ssl/share/perl5/CGI/examples/make_links.pl |
#!/usr/local/bin/perl # this is just a utility for creating symlinks from *.txt to *.cgi # for documentation purposes. foreach (<*.cgi>) { ($target=$_)=~s/cgi$/txt/; symlink $_,$target }