Sign in
android
/
toolchain
/
perl
/
85598a3a597441edb4af308243cc9ff5f9666330
/
.
/
perl-5.16.2
/
cpan
/
CGI
/
examples
/
make_links.pl
blob: a0aa824556f64b8ec5abc7463b593ed25d768525 [
file
] [
log
] [
blame
]
#!/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
}