/usr/share/doc/libfile-copy-link-perl/examples/copylink is in libfile-copy-link-perl 0.140-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 | #!/usr/bin/perl
use strict;
use warnings;
use File::Copy::Link qw(copylink);
my $VERSION = $File::Copy::Link::VERSION;
for my $file (@ARGV) {
copylink $file;
}
# $Id: copylink 218 2008-06-12 11:09:11Z rmb1 $
|