Server IP : 80.241.246.6 / Your IP : 216.73.216.129 Web Server : Apache/2.4.25 (Debian) System : Linux kharagauli 4.9.0-19-amd64 #1 SMP Debian 4.9.320-2 (2022-06-30) x86_64 User : www-data ( 33) PHP Version : 7.0.33-0+deb9u12 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_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority, MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/perl/5.24.1/Locale/Codes/ |
Upload File : |
package Locale::Codes::Language; # Copyright (C) 2001 Canon Research Centre Europe (CRE). # Copyright (C) 2002-2009 Neil Bowers # Copyright (c) 2010-2015 Sullivan Beck # This program is free software; you can redistribute it and/or modify it # under the same terms as Perl itself. use strict; require 5.006; use warnings; require Exporter; use Carp; use Locale::Codes; use Locale::Codes::Constants; use Locale::Codes::Language_Codes; use Locale::Codes::Language_Retired; #======================================================================= # Public Global Variables #======================================================================= our($VERSION,@ISA,@EXPORT,@EXPORT_OK); $VERSION='3.37'; @ISA = qw(Exporter); @EXPORT = qw(code2language language2code all_language_codes all_language_names language_code2code LOCALE_LANG_ALPHA_2 LOCALE_LANG_ALPHA_3 LOCALE_LANG_TERM ); sub code2language { return Locale::Codes::_code2name('language',@_); } sub language2code { return Locale::Codes::_name2code('language',@_); } sub language_code2code { return Locale::Codes::_code2code('language',@_); } sub all_language_codes { return Locale::Codes::_all_codes('language',@_); } sub all_language_names { return Locale::Codes::_all_names('language',@_); } sub rename_language { return Locale::Codes::_rename('language',@_); } sub add_language { return Locale::Codes::_add_code('language',@_); } sub delete_language { return Locale::Codes::_delete_code('language',@_); } sub add_language_alias { return Locale::Codes::_add_alias('language',@_); } sub delete_language_alias { return Locale::Codes::_delete_alias('language',@_); } sub rename_language_code { return Locale::Codes::_rename_code('language',@_); } sub add_language_code_alias { return Locale::Codes::_add_code_alias('language',@_); } sub delete_language_code_alias { return Locale::Codes::_delete_code_alias('language',@_); } 1; # Local Variables: # mode: cperl # indent-tabs-mode: nil # cperl-indent-level: 3 # cperl-continued-statement-offset: 2 # cperl-continued-brace-offset: 0 # cperl-brace-offset: 0 # cperl-brace-imaginary-offset: 0 # cperl-label-offset: -2 # End: