$Verbose = 1;
$Is_VMS = $^O eq 'VMS';
-$VERSION = substr(q$Revision: 1.27 $,10,4);
+$VERSION = "1.28";
$Quiet = 0;
# Really cool fix from Ilya :)
unless (defined $Config{d_link}) {
- local($^W) = 0; # avoid sub redefined message
*ln = \&cp;
}
if (-l $srcFile) {
cp($srcFile, $dstFile);
} else {
- ln($srcFile, $dstFile);
+ ln($srcFile, $dstFile) or cp($srcFile, $dstFile);
}
}
=head1 AUTHOR
-Andreas Koenig E<lt>F<koenig@franz.ww.TU-Berlin.DE>E<gt>
+Andreas Koenig F<E<lt>koenig@franz.ww.TU-Berlin.DEE<gt>>
=cut