/usr/bin/ppit is in libconfig-pit-perl 0.04-1.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 | #!/usr/bin/perl
eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
if 0; # not running under some shell
use strict;
use warnings;
use FindBin;
use Path::Class;
use YAML;
use File::Temp;
use Pod::Usage;
use lib file( $FindBin::RealBin, '..', 'lib' )->stringify;
use Config::Pit;
({
get => \&Config::Pit::pipe,
set => \&pit_set,
switch => \&pit_switch,
}->{(shift || '')} || \&pod2usage )->($ARGV[1]);
__END__
=head1 NAME
ppit - pit for perl
=head1 SYNOPSIS
$ ppit [get|set|switch] <value>
$ ppit help
Options:
get <name> => Get values of <name>.
set <name> => Config values of name with $EDITOR.
switch <profile> => Switch profile to <profile>.
help => show this manual
=head1 DESCRIPTION
pit command for Perl
=head1 AUTHOR
Kazuhiro Osawa
=head1 LICENSE
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
=head1 SEE ALSO
L<http://lowreal.rubyforge.org/pit/>
L<Config::Pit>
=cut
|