|
Server : LiteSpeed System : Linux srv104790275 5.15.0-161-generic #171-Ubuntu SMP Sat Oct 11 08:17:01 UTC 2025 x86_64 User : dewac4139 ( 1077) PHP Version : 8.0.30 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare, Directory : /proc/712700/root/bin/ |
Upload File : |
#!/usr/bin/perl -w
=head1 NAME
debconf-loadtemplate - load template file into debconf database
=cut
use strict;
use Debconf::Db;
use Debconf::Template;
=head1 SYNOPSIS
debconf-loadtemplate owner file [file ..]
=head1 DESCRIPTION
Loads one or more template files into the debconf database. The first
parameter specifies the owner of the templates (typically, the owner is the
name of a debian package). The remaining parameters are template files to
load.
=head1 WARNING
This program should never be used from a maintainer script of a package
that uses debconf! It may however, be useful in debugging, or to seed the
debconf database.
=head1 SEE ALSO
L<debconf-communicate(1)>
=cut
sub usage {
die "Usage: $0 owner file\n";
}
my $owner=shift || usage();
usage() unless @ARGV;
Debconf::Db->load;
Debconf::Template->load($_, $owner) foreach @ARGV;
Debconf::Db->save;
=head1 AUTHOR
Joey Hess <joeyh@debian.org>
=cut