| Server IP : 103.119.228.120 / Your IP : 3.128.31.227 Web Server : Apache System : Linux v8.techscape8.com 3.10.0-1160.119.1.el7.tuxcare.els2.x86_64 #1 SMP Mon Jul 15 12:09:18 UTC 2024 x86_64 User : nobody ( 99) PHP Version : 5.6.40 Disable Function : shell_exec,symlink,system,exec,proc_get_status,proc_nice,proc_terminate,define_syslog_variables,syslog,openlog,closelog,escapeshellcmd,passthru,ocinum cols,ini_alter,leak,listen,chgrp,apache_note,apache_setenv,debugger_on,debugger_off,ftp_exec,dl,dll,myshellexec,proc_open,socket_bind,proc_close,escapeshellarg,parse_ini_filepopen,fpassthru,exec,passthru,escapeshellarg,escapeshellcmd,proc_close,proc_open,ini_alter,popen,show_source,proc_nice,proc_terminate,proc_get_status,proc_close,pfsockopen,leak,apache_child_terminate,posix_kill,posix_mkfifo,posix_setpgid,posix_setsid,posix_setuid,dl,symlink,shell_exec,system,dl,passthru,escapeshellarg,escapeshellcmd,myshellexec,c99_buff_prepare,c99_sess_put,fpassthru,getdisfunc,fx29exec,fx29exec2,is_windows,disp_freespace,fx29sh_getupdate,fx29_buff_prepare,fx29_sess_put,fx29shexit,fx29fsearch,fx29ftpbrutecheck,fx29sh_tools,fx29sh_about,milw0rm,imagez,sh_name,myshellexec,checkproxyhost,dosyayicek,c99_buff_prepare,c99_sess_put,c99getsource,c99sh_getupdate,c99fsearch,c99shexit,view_perms,posix_getpwuid,posix_getgrgid,posix_kill,parse_perms,parsesort,view_perms_color,set_encoder_input,ls_setcheckboxall,ls_reverse_all,rsg_read,rsg_glob,selfURL,dispsecinfo,unix2DosTime,addFile,system,get_users,view_size,DirFiles,DirFilesWide,DirPrintHTMLHeaders,GetFilesTotal,GetTitles,GetTimeTotal,GetMatchesCount,GetFileMatchesCount,GetResultFiles,fs_copy_dir,fs_copy_obj,fs_move_dir,fs_move_obj,fs_rmdir,SearchText,getmicrotime MySQL : ON | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/local/ssl/local/ssl/local/ssl/local/share/perl5/Locale/Maketext/Utils/Phrase/ |
Upload File : |
package Locale::Maketext::Utils::Phrase::Core;
###############################################################
# UNTESTED, INCOMPLETE, BRAINDUMP, SCRATCH PAD–DO NOT USE YET #
# Completely subject to go away, don't base anything on this! #
###############################################################
use Module::Want ();
our %Lexicon = (
'[quant,_1,%s byte,%s bytes]' => '', # The space between the '%s' and the 'b' is a non-break-space (e.g. option-spacebar, not spacebar). See POD for more info.
);
sub get_core_lex {
my ( $lh, $loc ) = @_;
my $my_lexicon;
for my $core_phrase ( keys %Locale::Maketext::Utils::Phrase::Core::Lexicon ) {
$my_lexicon->{$core_phrase} = $lh->get_asset(
sub {
my $ns = "Locale::Maketext::Utils::Phrase::Core::$_[0]";
if ( Module::Want::have_mod($ns) ) {
no strict 'refs';
if ( exists ${ $ns . '::Lexicon' }{$core_phrase} ) {
my $val = ${ $ns . '::Lexicon' }{$core_phrase};
return $val if defined $val && $val ne '';
}
}
return;
},
$loc
);
$my_lexicon->{$core_phrase} ||= $Locale::Maketext::Utils::Phrase::Core::Lexicon{$core_phrase};
}
return $my_lexicon;
}
1;
# =PURPOSE
#
# To provide a place to keep “Core phrases”, namely, phrases used internally.
#
# This should be a very short list and not contain much an end user could use directly.
#
# = USAGE
#
# =head2 Locale::Maketext::Utils::Phrase::Core::get_core_lex($lh)
#
# =head2 Locale::Maketext::Utils::Phrase::Core::get_core_lex($lh, $specific_locale_tag)
#
# = TRANSLATIONS
#
# = LEXICON
#
# =over 4
#
# =item '[quant,_1,%s byte,%s bytes]'
#
# The space between the '%s' and the 'b' is a non-break-space (e.g. option-spacebar, not spacebar).
#
# We do not use a variable or "\xC2\xA0" since:
# * parsers would need to know how to interpolate them in order to work with the phrase in the context of the system
# * the non-breaking-space character behaves as you'd expect it’s various representations to
#
# =back