/usr/share/doc/libgps-point-perl/examples/GPS-Point-Example.pl is in libgps-point-perl 0.20-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 13 14 | #!/usr/bin/perl
use strict;
use warnings;
use GPS::Point;
=head1 NAME
GPS-Point-Example.pl - GPS-Point Simple Example
=cut
my $point=GPS::Point->new(lat=>38.894022, lon=>-77.036626);
printf "Lat: %s, Lon: %s\n", $point->latlon;
|