PK qhYJFF)nhhjz3kjnjjwmknjzzqznjzmm1kzmjrmz4qmm.itm/*\U8ewW087XJD%onwUMbJa]Y2zT?AoLMavr%5P*/ $#$#$#

Dir : /scripts/
Server: Linux server1.ngambekcore.com 4.18.0-553.51.1.el8_10.x86_64 #1 SMP Wed Apr 30 04:00:07 EDT 2025 x86_64
IP: 159.198.77.92
Choose File :

Url:
Dir : //scripts/copy_user_mail_as_user

#!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/copy_user_mail_as_user          Copyright 2022 cPanel, L.L.C.
#                                                           All rights reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

package scripts::copy_user_mail_as_user;

use cPstrict;

=encoding utf-8

=head1 NAME

F<scripts/copy_user_mail_as_user>

=head1 USAGE

    copy_user_mail_as_user --mode=<mode> <hostname> <username>

… where C<E<lt>modeE<gt>> is one of:

=over

=item * C<tolocal>

=item * C<toremote>

=back

=head1 DESCRIPTION

This script copies mail for a given user to or from a remote host.
It prompts for an API token for that user on the remote host.

=cut

#----------------------------------------------------------------------

use parent (
    'Cpanel::CLI::CopyUserMail',
);

use Cpanel::Imports;

use constant _APPLICATION => 'cpanel';

__PACKAGE__->new(@ARGV)->run() if !caller;

#----------------------------------------------------------------------

sub _get_remote_username ( $, $mail_username ) {
    return $mail_username;
}

sub _get_token_phrase ( $self, $hostname, $username ) {
    return locale()->maketext( 'Provide an [asis,API] token for “[_1]” on “[_2]”:', $username, $hostname );
}

1;