Current Path :
/
usr
/
share
/
perl5
/
CGI
/
examples
/
Or
Select Your Path :
Upload File :
New :
File
Dir
//usr/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 }