Result:
found more than 514 distributions - search limited to the first 2001 files matching your query
( run in 2.224 )
Apache2-Response-FileMerge
view release on metacpan or search on metacpan
lib/Apache2/Response/FileMerge.pm view on Meta::CPAN
Original author and maintainer.
=item Romuald Brunet
Generously submitted a patch adopting HTTP::Date to support
POSIX locales and standard international date formats; particularly
useful for file-modification based caching.
=item Stephen Howard (L<http://search.cpan.org/~howars/>)
Submitted concept and patches for file/dir name substituion.
Apache2-SSI
view release on metacpan or search on metacpan
lib/Apache2/SSI.pm view on Meta::CPAN
# 0 when we haven't. Initially it's as if we're in a big true
# if-block with no else.
$self->{if_state} = [1];
$self->{notes} = '';
$self->{suspend} = [0];
# undef means the current locale's default
$self->mod_perl( defined( $MOD_PERL ) ? length( $MOD_PERL ) > 0 : 0 );
my $r = $self->apache_request;
if( $MOD_PERL && !$r )
{
# NOTE: Must check if GlobalRequest is set
lib/Apache2/SSI.pm view on Meta::CPAN
my $env = $self->env;
$format ||= $self->{timefmt};
# Quotes are important as they are used to stringify overloaded $time
my $params = { epoch => "$time" };
$params->{time_zone} = ( $tzone || 'local' );
$params->{locale} = $env->{lang} if( length( $env->{lang} ) );
require DateTime;
require DateTime::Format::Strptime;
my $tz;
# DateTime::TimeZone::Local will die ungracefully if the local timezeon is not set with the error:
# "Cannot determine local time zone"
lib/Apache2/SSI.pm view on Meta::CPAN
if( length( $format ) )
{
my $fmt = DateTime::Format::Strptime->new(
pattern => $format,
time_zone => ( $params->{time_zone} || $tz ),
locale => $dt->locale->code,
);
$dt->set_formatter( $fmt );
return( $dt );
}
else
{
return( $dt->format_cldr( $dt->locale->date_format_full ) );
}
};
if( $@ )
{
$self->error( "An error occurred getting a DateTime object for time \"$time\" with format \"$format\": $@" );
lib/Apache2/SSI.pm view on Meta::CPAN
See L<Apache2 documentation|https://httpd.apache.org/docs/current/en/howto/ssi.html> for more information on this.
=item C<timefmt>
The default way to format a date time. By default, this uses the display according to your locale, such as C<ja_JP> (for Japan) or C<en_GB> for the United Kingdom. The time zone can be specified in the format, or it will be set to the local time zone...
See L<Apache2 documentation|https://httpd.apache.org/docs/current/en/howto/ssi.html> for more information on this.
=item C<trunk>
lib/Apache2/SSI.pm view on Meta::CPAN
=for Pod::Coverage parse_echo_query_string
=head2 parse_echo_date_gmt
Returns the current date with time zone set to gmt and based on the provided format or the format available for the current locale such as C<ja_JP> or C<en_GB>.
=head2 parse_echo_date_local
Returns the current date with time zone set to the local time zone whatever that may be and on the provided format or the format available for the current locale such as C<ja_JP> or C<en_GB>.
Example:
<!--#echo var="DATE_LOCAL" -->
lib/Apache2/SSI.pm view on Meta::CPAN
The document uri would include, if any, any path info and query string.
=head2 parse_echo_last_modified
This returns document last modified date. Under Apache, there is a standard environment variable called C<LAST_MODIFIED> (see the section on L</SSI Directives>), and if somehow absent, it will return instead the formatted last modification datetime f...
Outside of Apache, the similar result is achieved by returning the value of the environment variable C<LAST_MODIFIED> if available, or the formatted datetime of the document uri as set with L</document_uri>
Example:
Apache2-ScoreBoardFile
view release on metacpan or search on metacpan
aTHX|5.006000||p
add_data|||n
addmad|||
allocmy|||
amagic_call|||
amagic_cmp_locale|||
amagic_cmp|||
amagic_i_ncmp|||
amagic_ncmp|||
any_dup|||
ao|||
hv_store_ent||5.004000|
hv_store_flags||5.008000|
hv_stores|5.009004||p
hv_store|||
hv_undef|||
ibcmp_locale||5.004000|
ibcmp_utf8||5.007003|
ibcmp|||
incline|||
incpush_if_exists|||
incpush_use_sep|||
stack_grow|||
start_force|||
start_glob|||
start_subparse||5.004000|
stashpv_hvname_match||5.011000|
stdize_locale|||
store_cop_label|||
strEQ|||
strGE|||
strGT|||
strLE|||
sv_catxmlsv|||
sv_chop|||
sv_clean_all|||
sv_clean_objs|||
sv_clear|||
sv_cmp_locale||5.004000|
sv_cmp|||
sv_collxfrm|||
sv_compile_2op||5.008001|
sv_copypv||5.007003|
sv_dec|||
return TRUE;
}
}
#else
/* older perls don't have PL_numeric_radix_sv so the radix
* must manually be requested from locale.h
*/
#include <locale.h>
dTHR; /* needed for older threaded perls */
struct lconv *lc = localeconv();
char *radix = lc->decimal_point;
if (radix && IN_LOCALE) {
STRLEN len = strlen(radix);
if (*sp + len <= send && memEQ(*sp, radix, len)) {
*sp += len;
}
}
#endif
#endif /* USE_LOCALE_NUMERIC */
/* always try "." if numeric radix didn't match because
* we may have data from different locales mixed */
if (*sp < send && **sp == '.') {
++*sp;
return TRUE;
}
return FALSE;
Apophis
view release on metacpan or search on metacpan
ALLOC_THREAD_KEY|5.005003||Viu
ALT_DIGITS|5.027010||Viu
amagic_call|5.003007|5.003007|u
amagic_cmp|5.009003||Viu
amagic_cmp_desc|5.031010||Viu
amagic_cmp_locale|5.009003||Viu
amagic_cmp_locale_desc|5.031010||Viu
amagic_deref_call|5.013007|5.013007|u
amagic_i_ncmp|5.009003||Viu
amagic_i_ncmp_desc|5.031010||Viu
amagic_is_enabled|5.015008||Viu
amagic_ncmp|5.009003||Viu
CHARBITS|5.011002|5.011002|Vn
CHARSET_PAT_MODS|5.013010||Viu
chdir|5.005000||Viu
checkcomma|5.003007||Viu
check_end_shift|5.009005||Viu
check_locale_boundary_crossing|5.015006||Viu
CHECK_MALLOC_TAINT|5.008001||Viu
CHECK_MALLOC_TOO_LATE_FOR|5.008001||Viu
check_offset_max|5.005000||Viu
check_offset_min|5.005000||Viu
check_substr|5.005000||Viu
cMETHOPx_rclass|5.021007||Viu
cmpchain_extend|5.031010||Viu
cmpchain_finish|5.031010||Viu
cmpchain_start|5.031010||Viu
cmp_desc|5.031010||Viu
cmp_locale_desc|5.031010||Viu
cntrl_to_mnemonic|5.021004||cVniu
CODESET|5.027010||Viu
COMBINING_DOT_ABOVE_UTF8|5.029008||Viu
COMBINING_GRAVE_ACCENT_UTF8|5.017004||Viu
COMMIT|5.009005||Viu
edit_distance|5.023008||Vniu
EIGHT_BIT_UTF8_TO_NATIVE|5.023003||Viu
ELEMENT_RANGE_MATCHES_INVLIST|5.023002||Viu
EMBEDMYMALLOC|5.006000||Viu
emulate_cop_io|||xciu
emulate_setlocale|5.027009||Vniu
END|5.003007||Viu
END_EXTERN_C|5.005000|5.003007|pV
endgrent|5.009000||Viu
ENDGRENT_R_HAS_FPTR|5.008000||Viu
ENDGRENT_R_PROTO|5.008000|5.008000|Vn
FmLINES|5.003007||Viu
fold_constants|5.003007||Viu
foldEQ|5.013002|5.013002|n
foldEQ_latin1|5.013008||cVnu
foldEQ_latin1_s2_folded|5.029007||Vniu
foldEQ_locale|5.013002|5.013002|n
FOLDEQ_LOCALE|5.019009||Viu
FOLDEQ_S1_ALREADY_FOLDED|5.015004||Viu
FOLDEQ_S1_FOLDS_SANE|5.021008||Viu
FOLDEQ_S2_ALREADY_FOLDED|5.015004||Viu
FOLDEQ_S2_FOLDS_SANE|5.021008||Viu
I8_TO_NATIVE|5.015006||Viu
I8_TO_NATIVE_UTF8|5.019004||Viu
I8TYPE|5.006000|5.006000|Vn
I_ARPA_INET|5.005000|5.005000|Vn
ibcmp|5.003007|5.003007|
ibcmp_locale|5.004000|5.004000|
ibcmp_utf8|5.007003|5.007003|
I_CRYPT|5.008000|5.008000|Vn
I_DBM|5.031006|5.031006|Vn
I_DIRENT|5.003007|5.003007|Vn
I_DLFCN|5.003007|5.003007|Vn
isIDFIRST_utf8|5.031005|5.031005|
isIDFIRST_utf8_safe|5.025009|5.006000|p
isIDFIRST_uvchr|5.023009|5.006000|p
isinfnan|5.021004|5.021004|n
isinfnansv|5.021005||Vi
_is_in_locale_category|5.021001||cViu
is_invariant_string|5.021007|5.011000|pn
is_invlist|5.029002||Vniu
is_LAX_VERSION|5.011004||Viu
isLB|5.023007||Viu
isLEXWARN_off|5.006000||Viu
PERL_SCRIPT_MODE|5.004005||Viu
PERL_SEEN_HV_FUNC_H|5.017010||Viu
PERL_SEEN_HV_MACRO_H|5.027001||Viu
PERL_SET_CONTEXT|5.006000||Viu
PERL_SET_INTERP|5.006000||Viu
Perl_setlocale|5.027002|5.027002|n
PERL_SET_PHASE|5.015001||Viu
PERL_SET_THX|5.006000||Viu
Perl_sharepvn|5.006000||Viu
PERL_SHORT_MAX|5.003007|5.003007|p
PERL_SHORT_MIN|5.003007|5.003007|p
PL_cop_seqmax|5.005000||Viu
PL_cryptseen|5.005000||Viu
PL_cshlen|5.005000||Viu
PL_curcop|5.004005|5.003007|p
PL_curcopdb|5.005000||Viu
PL_curlocales|5.027009||Viu
PL_curpad|5.005000|5.005000|x
PL_curpm|5.005000||Viu
PL_curpm_under|5.025007||Viu
PL_curstack|5.005000||Viu
PL_curstackinfo|5.005000||Viu
PL_in_my||5.003007|ponu
PL_in_my_stash||5.005000|ponu
PL_inplace|5.005000||Viu
PL_in_some_fold|5.029007||Viu
PL_internal_random_state|5.027004||Viu
PL_in_utf8_COLLATE_locale|5.025002||Viu
PL_in_utf8_CTYPE_locale|5.019009||Viu
PL_in_utf8_turkic_locale|5.029008||Viu
PL_isarev|5.009005||Viu
PL_keyword_plugin|5.011002|5.011002|x
PL_known_layers|5.007003||Viu
PL_langinfo_buf|5.027004||Viu
PL_langinfo_bufsize|5.027004||Viu
PL_lc_numeric_mutex_depth|5.027009||Viu
PL_lex_state||5.003007|ponu
PL_lex_stuff||5.003007|ponu
PL_linestr||5.003007|ponu
PL_LIO|5.006000||Viu
PL_locale_utf8ness|5.027009||Viu
PL_localizing|5.005000||Viu
PL_localpatches|5.005000||Viu
PL_lockhook|5.007003||Viu
PL_main_cv|5.005000||Viu
PL_main_root|5.005000||Viu
PL_scopestack_ix|5.005000||Viu
PL_scopestack_max|5.005000||Viu
PL_scopestack_name|5.011002||Viu
PL_SCX_invlist|5.027008||Viu
PL_secondgv|5.005000||Viu
PL_setlocale_buf|5.027009||Viu
PL_setlocale_bufsize|5.027009||Viu
PL_sharehook|5.007003||Viu
PL_sighandler1p|5.031007||Viu
PL_sighandler3p|5.031007||Viu
PL_sighandlerp|5.005000||Viu
PL_signalhook|5.013002||Viu
PL_utf8_charname_begin|5.017006||Viu
PL_utf8_charname_continue|5.017006||Viu
PL_utf8_foldclosures|5.013007||Viu
PL_utf8_idcont|5.008000||Viu
PL_utf8_idstart|5.008000||Viu
PL_utf8locale|5.008001||Viu
PL_utf8_mark|5.006000||Viu
PL_utf8_perl_idcont|5.017008||Viu
PL_utf8_perl_idstart|5.015004||Viu
PL_utf8_tofold|5.007003||Viu
PL_utf8_tolower|5.006000||Viu
PL_vtbl_taint|5.015000||Viu
PL_vtbl_utf8|5.015000||Viu
PL_vtbl_uvar|5.015000||Viu
PL_vtbl_vec|5.015000||Viu
PL_warnhook|5.005000||Viu
PL_warn_locale|5.021008||Viu
PL_watchaddr|5.006000||Viu
PL_watchok|5.006000||Viu
PL_WB_invlist|5.021009||Viu
PL_wcrtomb_ps|5.031009||Viu
PL_XPosix_ptrs|5.017008||Viu
prescan_version|5.011004|5.011004|
PRESCAN_VERSION|5.019008||Viu
PREVOPER|5.003007||Viu
PREV_RANGE_MATCHES_INVLIST|5.023002||Viu
printbuf|5.009004||Viu
print_bytes_for_locale|5.027002||Viu
print_collxfrm_input_and_return|5.025004||Viu
printf|5.003007||Viu
PRINTF_FORMAT_NULL_OK|5.009005|5.009005|Vn
printf_nocontext|5.007001|5.007001|vdnu
PRIVLIB|5.003007|5.003007|Vn
ReREFCNT_dec|5.005000||Viu
ReREFCNT_inc|5.005000||Viu
RESTORE_ERRNO|5.010001||Vi
RESTORE_LC_NUMERIC|5.021010|5.021010|p
restore_magic|5.009003||Viu
restore_switched_locale|5.027009||Viu
RE_SV_DUMPLEN|5.009004||Viu
RE_SV_ESCAPE|5.009004||Viu
RE_SV_TAIL|5.009004||Viu
RETPUSHNO|5.003007||Viu
RETPUSHUNDEF|5.003007||Viu
sethostent|5.005000||Viu
SETHOSTENT_R_PROTO|5.008000|5.008000|Vn
SETi|5.003007||Viu
setjmp|5.005000||Viu
setlinebuf|5.005000||Viu
setlocale|5.009000||Viu
setlocale_debug_string|5.027002||Vniu
SETLOCALE_R_PROTO|5.008000|5.008000|Vn
SET_MARK_OFFSET|5.006000||Viu
setmode|5.005000||Viu
SETn|5.003007||Viu
setnetent|5.005000||Viu
SS_ADD_UV|5.017007||Viu
SS_BUFFEROVF|5.021009||Viu
ssc_add_range|5.019005||Viu
ssc_and|5.019005||Viu
ssc_anything|5.019005||Viu
ssc_clear_locale|5.019005||Vniu
ssc_cp_and|5.019005||Viu
ssc_finalize|5.019005||Viu
SSCHECK|5.003007||Viu
ssc_init|5.019005||Viu
ssc_intersection|5.019005||Viu
stderr|5.003007||Viu
stdin|5.003007||Viu
STDIO_PTR_LVAL_SETS_CNT|5.007001|5.007001|Vn
STDIO_PTR_LVALUE|5.006000|5.006000|Vn
STDIO_STREAM_ARRAY|5.006000|5.006000|Vn
stdize_locale|5.007001||Viu
stdout|5.003007||Viu
stdoutf|5.005000||Viu
STD_PAT_MODS|5.009005||Viu
STD_PMMOD_FLAGS_CLEAR|5.013006||Viu
ST_INO_SIGN|5.015002|5.015002|Vn
sv_clean_all|5.003007||Vi
sv_clean_objs|5.003007||Vi
sv_clear|5.003007|5.003007|
sv_cmp|5.003007|5.003007|
sv_cmp_flags|5.013006|5.013006|
sv_cmp_locale|5.004000|5.004000|
sv_cmp_locale_flags|5.013006|5.013006|
sv_collxfrm|5.013006||V
sv_collxfrm_flags|5.013006|5.013006|
SvCOMPILED|5.003007||Viu
SvCOMPILED_off|5.003007||Viu
SvCOMPILED_on|5.003007||Viu
SvVSTRING_mg|5.009004|5.003007|p
SvWEAKREF|5.006000||Viu
SvWEAKREF_off|5.006000||Viu
SvWEAKREF_on|5.006000||Viu
swallow_bom|5.006001||Viu
switch_category_locale_to_template|5.027009||Viu
SWITCHSTACK|5.003007||Viu
switch_to_global_locale|5.027009|5.003007|pn
sync_locale|5.027009|5.003007|pn
sys_init3|||cnu
sys_init|||cnu
sys_intern_clear|5.006001||Vu
sys_intern_dup|5.006000||Vu
sys_intern_init|5.006001||Vu
T_FMT_AMPM|5.027010||Viu
THIS|5.003007|5.003007|V
THOUSEP|5.027010||Viu
THR|5.005000||Viu
THREAD_CREATE_NEEDS_STACK|5.007002||Viu
thread_locale_init|5.027009|5.027009|xnu
thread_locale_term|5.027009|5.027009|xnu
THREAD_RET_TYPE|5.005000||Viu
tied_method|5.013009||vViu
TIED_METHOD_ARGUMENTS_ON_STACK|5.013009||Viu
TIED_METHOD_MORTALIZE_NOT_NEEDED|5.013009||Viu
TIED_METHOD_SAY|5.013009||Viu
WARN_PARENTHESIS|5.006000|5.003007|p
WARN_PIPE|5.006000|5.003007|p
WARN_PORTABLE|5.006000|5.003007|p
WARN_PRECEDENCE|5.006000|5.003007|p
WARN_PRINTF|5.006000|5.003007|p
_warn_problematic_locale|5.021008||cVniu
WARN_PROTOTYPE|5.006000|5.003007|p
WARN_QW|5.006000|5.003007|p
WARN_RECURSION|5.006000|5.003007|p
WARN_REDEFINE|5.006000|5.003007|p
WARN_REDUNDANT|5.021002|5.021002|
WIFEXITED|5.008001||Viu
WIFSIGNALED|5.008001||Viu
WIFSTOPPED|5.008001||Viu
win32_croak_not_implemented|5.017006||Vniu
WIN32SCK_IS_STDSCK|5.007001||Viu
win32_setlocale|5.027006||Viu
withinCOUNT|5.031004||Viu
WITH_LC_NUMERIC_SET_TO_NEEDED|5.031003|5.031003|
WITH_LC_NUMERIC_SET_TO_NEEDED_IN|5.031003|5.031003|
with_queued_errors|5.013001||Viu
WNOHANG|5.008001||Viu
(s)[1]))) \
: is ## macro ## _utf8(s))
/* A few of the early functions are broken. For these and the non-LC case,
* machine generated code is substituted. But that code doesn't work for
* locales. This is just like the above macro, but at the end, we call the
* macro we've generated for the above 255 case, which is correct since locale
* isn't involved. This will generate extra code to handle the 0-255 inputs,
* but hopefully it will be optimized out by the C compiler. But just in case
* it isn't, this macro is only used on the few versions that are broken */
#define D_PPP_IS_GENERIC_LC_UTF8_SAFE_BROKEN(s, e, macro) \
#ifdef EBCDIC
/* This is the first version where these macros are fully correct on EBCDIC
* platforms. Relying on * the C library functions, as earlier releases did,
* causes problems with * locales */
# if (PERL_BCDVERSION < 0x5022000)
# undef isALNUM
# undef isALNUM_A
# undef isALNUM_L1
# undef isALNUMC
#else /* Above is EBCDIC; below is ASCII */
# if (PERL_BCDVERSION < 0x5004000)
/* The implementation of these in older perl versions can give wrong results if
* the C program locale is set to other than the C locale */
# undef isALNUM
# undef isALNUM_A
# undef isALPHA
# undef isALPHA_A
# undef isDIGIT
return TRUE;
}
}
#else
/* older perls don't have PL_numeric_radix_sv so the radix
* must manually be requested from locale.h
*/
#include <locale.h>
dTHR; /* needed for older threaded perls */
struct lconv *lc = localeconv();
char *radix = lc->decimal_point;
if (radix && IN_LOCALE) {
STRLEN len = strlen(radix);
if (*sp + len <= send && memEQ(*sp, radix, len)) {
*sp += len;
}
}
#endif
#endif /* USE_LOCALE_NUMERIC */
/* always try "." if numeric radix didn't match because
* we may have data from different locales mixed */
if (*sp < send && **sp == '.') {
++*sp;
return TRUE;
}
return FALSE;
# define DECLARATION_FOR_LC_NUMERIC_MANIPULATION char *LoC_
#endif
#ifndef STORE_NUMERIC_SET_STANDARD
# define STORE_NUMERIC_SET_STANDARD() \
LoC_ = savepv(setlocale(LC_NUMERIC, NULL)); \
SAVEFREEPV(LoC_); \
setlocale(LC_NUMERIC, "C");
#endif
#ifndef RESTORE_LC_NUMERIC
# define RESTORE_LC_NUMERIC() \
setlocale(LC_NUMERIC, LoC_);
#endif
# else
#ifndef DECLARATION_FOR_LC_NUMERIC_MANIPULATION
# define DECLARATION_FOR_LC_NUMERIC_MANIPULATION
#ifndef UNLOCK_LC_NUMERIC_STANDARD
# define UNLOCK_LC_NUMERIC_STANDARD UNLOCK_NUMERIC_STANDARD
#endif
/* If this doesn't exist, it's not needed, so is void noop */
#ifndef switch_to_global_locale
# define switch_to_global_locale()
#endif
/* Originally, this didn't return a value, but in perls like that, the value
* should always be TRUE. Add a return to Perl_sync_locale() when it's
* available. And actually do a sync when its not, if locales are available on
* this system. */
#ifdef sync_locale
# if (PERL_BCDVERSION < 0x5027009)
# if (PERL_BCDVERSION >= 0x5021003)
# undef sync_locale
# define sync_locale() (Perl_sync_locale(aTHX), 1)
# elif defined(sync_locale) /* These should only be the 5.20 maints*/
# undef sync_locale /* Just copy their defn and return 1 */
# define sync_locale() (new_ctype(setlocale(LC_CTYPE, NULL)), \
new_collate(setlocale(LC_COLLATE, NULL)), \
set_numeric_local(), \
new_numeric(setlocale(LC_NUMERIC, NULL)), \
1)
# elif defined(new_ctype) && defined(LC_CTYPE)
# define sync_locale() (new_ctype(setlocale(LC_CTYPE, NULL)), 1)
# endif
# endif
#endif
#ifndef sync_locale
# define sync_locale() 1
#endif
#endif /* _P_P_PORTABILITY_H_ */
/* End of File ppport.h */
App-AcmeCpanauthors
view release on metacpan or search on metacpan
script/acme-cpanauthors view on Meta::CPAN
#L</FORMAT_PRETTY_TABLE_BACKEND>, to be passed to
#L<Text::Table::Any>C<::table()>'s C<backend_opts> argument. It should be a hash
#encoded in JSON, e.g.:
#
# # keep table aligned in the presence of wide Unicode characters
# % FORMAT_PRETTY_TABLE_BACKEND=Text::Table::More FORMAT_PRETTY_TABLE_BACKEND_OPTS='{"wide_char":1}' tabledata locale::JP::City::MIC --page
#
#=head2 FORMAT_PRETTY_TABLE_COLUMN_ORDERS => array (json)
#
#Set the default of C<table_column_orders> in C<format_options> in result
#metadata, similar to what's implemented in L<Perinci::Result::Format> and
App-BPOMUtils-RPO-Ingredients
view release on metacpan or search on metacpan
lib/App/BPOMUtils/RPO/Ingredients.pm view on Meta::CPAN
package App::BPOMUtils::RPO::Ingredients;
use 5.010001;
use locale;
use strict;
use warnings;
use Log::ger;
use Exporter 'import';
use POSIX 'setlocale', 'LC_ALL';
our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
our $DATE = '2024-04-06'; # DATE
our $DIST = 'App-BPOMUtils-RPO-Ingredients'; # DIST
our $VERSION = '0.007'; # VERSION
lib/App/BPOMUtils/RPO/Ingredients.pm view on Meta::CPAN
my $csv = Text::CSV->new({binary=>1, auto_diag=>1});
my @rows;
while (my $row = $csv->getline(\*STDIN)) { push @rows, $row }
if ($args{lang} eq 'ind') {
POSIX::setlocale(LC_ALL, "id_ID.UTF-8") or die "Can't set locale to id_ID.UTF-8";
} else {
}
my %weights; # key = ingredient name, value = weight
my %ingredients; # key = name, value = { weight=>, items=> }
App-BS
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
Carp 0
ExtUtils::MakeMaker 0
HTTP::Date 6
HTTP::Headers::Util 6
HTTP::Request 0
locale 0
perl 5.008001
strict 0
HTTP-Date-6.06
pathname: O/OA/OALDERS/HTTP-Date-6.06.tar.gz
provides:
cpanfile.snapshot view on Meta::CPAN
POSIX 0
Pod::Escapes 0
Pod::Simple 3.27
Text::Wrap 0
constant 0
locale 0
parent 0
perl 5.008001
Pod-Usage-2.05
pathname: M/MA/MAREKR/Pod-Usage-2.05.tar.gz
provides:
App-Basis-Queue
view release on metacpan or search on metacpan
lib/App/Basis/Queue.pm view on Meta::CPAN
} elsif ( $datetime =~ /^\d+$/ ) {
# assume anything less than five days is a time into the future
$datetime += time() if ( $datetime <= FIVE_DAYS ) ;
@ret = ( _std_datetime($datetime), $datetime ) ;
} else {
# so parse will parse in locale time not as UTC
$date->parse($datetime) ;
{
# if we get a warning about converting the date to a day, there
# must be a problem with parsing the input date string
local $SIG{__WARN__} = sub {
App-BoolFindGrep
view release on metacpan or search on metacpan
Change: 598b03a210e6d87b38724ac565f6b88790cce3b3
Author: Ronaldo Ferreira de Lima <jimmy.tty@gmail.com>
Date : 2015-07-01 22:06:42 +0000
* bin/bfg: input now respect locale
Change: 85cc0928de45f5169b9e37fba93e672b5c3575fc
Author: Ronaldo Ferreira de Lima <jimmy.tty@gmail.com>
Date : 2015-07-01 22:01:39 +0000
* bin/bfg: output now respect locale
Change: 07313c80eecda89daaaebe5de9e29d2f605db00d
Author: Ronaldo Ferreira de Lima <jimmy.tty@gmail.com>
Date : 2015-05-26 17:25:28 +0000
App-CPAN2Pkg
view release on metacpan or search on metacpan
lib/App/CPAN2Pkg/Worker.pm view on Meta::CPAN
$worker->run_command( $command, $event );
Run a C<$command> in another process, and takes care of everything.
Since it uses L<POE::Wheel::Run> underneath, it understands various
stuff such as running a code reference. Note: commands will be launched
under a C<C> locale.
Upon completion, yields back an C<$event> with the result status and the
command output.
=head1 EVENTS
App-CPANtoRPM
view release on metacpan or search on metacpan
lib/App/CPANtoRPM.pm view on Meta::CPAN
###############################################################################
use warnings;
use strict;
use locale;
use POSIX qw(locale_h);
use IO::File;
our($VERSION);
$VERSION="1.15";
lib/App/CPANtoRPM.pm view on Meta::CPAN
);
our ($OUTPUT,@OUTPUT,%package,$MAN);
$package{'VERSION'} = $VERSION;
my $old_locale = setlocale(LC_TIME);
setlocale(LC_TIME, "C");
$package{'date'} = POSIX::strftime("%a %b %d %Y",localtime());
setlocale(LC_TIME, $old_locale);
###############################################################################
###############################################################################
sub _new {
lib/App/CPANtoRPM.pm view on Meta::CPAN
$package{'CMD'} = $COM;
$package{'command'} = $0;
$package{'args'} = $self->_args();
$package{'self'} = $self;
my $old_locale = setlocale(LC_TIME);
setlocale(LC_TIME, "C");
$package{'date'} = POSIX::strftime("%a %b %d %Y",localtime());
setlocale(LC_TIME, $old_locale);
return $self;
}
sub _args {
lib/App/CPANtoRPM.pm view on Meta::CPAN
sub _make_spec {
my($self) = @_;
$self->_log_message('HEAD',"Writing spec file: $package{name}");
setlocale(LC_ALL, "en_US.UTF-8");
#
# A few more package values.
#
App-CalId
view release on metacpan or search on metacpan
lib/App/CalId.pm view on Meta::CPAN
my $hol = list_id_holidays(
detail => 1, year => $y, month => $m,
(is_joint_leave => 0) x !$args{show_joint_leave},
)->[2];
# XXX use locale
if ($args{show_year_in_title} // 1) {
push @lines, _center(21, sprintf("%s %d", $month_names->[$m-1], $y));
} else {
push @lines, _center(21, sprintf("%s", $month_names->[$m-1]));
}
push @lines, "Sn Sl Rb Km Jm Sb Mg"; # XXX use locale (but TBH locale's versions suck: Se Se Ra Ka Ju Sa Mi)
my $dow = $dt->day_of_week;
$dt->subtract(days => $dow-1);
for my $i (1..$dow-1) {
push @lines, "" if $i == 1;
App-CamelPKI
view release on metacpan or search on metacpan
inc/My/Tests/Below.pm view on Meta::CPAN
=item I<%ENV is standardized>
When running under C<require My::Tests::Below>, %ENV is reset to a
sane value to avoid freaky side effects when something weird is in the
PATH or in the locales and this influences some shell tool fired up by
the test suite. The original contents of %ENV is stashed away in
%main::ENVorig in case it is actually needed.
=cut
App-Changelog2x
view release on metacpan or search on metacpan
bin/changelog2x view on Meta::CPAN
=item -f STRING
This option specifies an alternate format pattern for the B<DateTime>
C<strftime> method to use when formatting the dates in the C<< <release> >>
tags. Note that B<< DateTime->strftime >> formatting is sensitive to your
locale setting. The format is also used for those output templates that
include "generated on" comments.
This option may be abbreviated as C<-f> for convenience.
=item --template NAME
App-Chart
view release on metacpan or search on metacpan
devel/generate-gt-names.pl view on Meta::CPAN
use Data::Dumper;
use POSIX ();
my $option_verbose = 1;
POSIX::setlocale(POSIX::LC_MESSAGES(), 'C');
my @modules = Module::Find::findsubmod ('GT::Indicators');
foreach my $module (@modules) {
my $filename = Module::Util::find_installed ($module)
|| die "oops $module filename not found";
App-Chronicle
view release on metacpan or search on metacpan
bin/chronicle view on Meta::CPAN
=cut
use strict;
use warnings;
use open ':std' => ':locale';
use open IO => ':encoding(UTF-8)';
package Chronicle;
use Module::Pluggable::Ordered require => 1, inner => 0;
App-ClusterSSH
view release on metacpan or search on metacpan
- Expand $HOME and ~ correctly when looking for files (thanks to Andrew Stevenson)
- Typo correction in README (thanks to Ankit Vadehra)
4.05 2015-11-28 Duncan Ferguson <duncan_ferguson@user.sf.net>
- Change default key_quit from 'Control-q' to 'Alt-q' (Github issue #50)
- Amend tests to always use C locale as some error messages are hardcoded in English (Github issue #49)
4.04_01 2015-11-21 Duncan Ferguson <duncan_ferguson@user.sf.net>
- Ensure documentation is generated using same perl as the build (Github issue #45)
- Pass '--action' through macro parsing (Github issue #42)
- Workaround for glitch in KDE where windows can become unmoveable (Github issue #46) (thanks to Brandon Perkins)
- Do not use system perl but whatever is found in PATH (to stop breaking perlbrew based builds)
- Warn when the configured terminal isn't installed/found
- Don't show 'Opening to:' when no servers are given
4.03_03 2014-09-28 Duncan Ferguson <duncan_ferguson@user.sf.net>
- Force tests to have English locale when user has something else set (Github issue: 10) (thanks to Emanuele Tomasi)
- Skip permissions check test when run as root as the results are invalid (Github issue: 11) (thanks to Deny Dias)
- Ensure config file option for ssh_args is not lost when options is not used on command line (Github issue: 14)
- New Send menu option to send a numeric value between 1 and 1024 (thanks to cqexbesd)
- Remove all history when history window closed (thanks to Bill Rushmore)
App-CompleteCLIs
view release on metacpan or search on metacpan
lib/App/CompleteCLIs.pm view on Meta::CPAN
=item 28. L<complete-known-mac>
=item 29. L<complete-language-code>
=item 30. L<complete-locale>
=item 31. L<complete-manpage>
=item 32. L<complete-manpage-section>
App-DBBrowser
view release on metacpan or search on metacpan
lib/App/DBBrowser/CreateDropAttach/CreateTable.pm view on Meta::CPAN
while ( 1 ) {
my $file_info;
if ( $source->{source_type} eq 'file' ) {
my $file_fs = $source->{file_fs};
my $file_name = basename decode( 'locale_fs', $file_fs );
$file_info = sprintf "File: '%s'", $file_name;
if ( ! length $tablename_default ) {
if ( length $source->{sheet_name} ) {
$file_name =~ s/\.[^.]{1,4}\z//;
$tablename_default = $file_name . '_' . $source->{sheet_name};
lib/App/DBBrowser/CreateDropAttach/CreateTable.pm view on Meta::CPAN
$ax->print_sql_info( $ax->get_sql_info( $sql ), 'Column data types: guessing ... ' );
my $header = $sql->{insert_col_names}; #
my $table = $sql->{insert_args};
my $encoding;
if ( $sf->{o}{create}{encode_for_data_type_guessing} ) { # MSSQL DB2 Oracle
$encoding = $source->{source_type} eq 'plain' ? 'locale' : $sf->{o}{insert}{file_encoding};
}
my @aoh;
if ( length $encoding ) {
for my $row ( @$table ) {
push @aoh, { map { $header->[$_] => Encode::encode( $encoding, $row->[$_] ) } 0 .. $#$header };
App-Dapper
view release on metacpan or search on metacpan
can be specified like this:
[% use myname = date %]
The plugin provides the format() method which accepts a time value, a format
string and a locale name. All of these parameters are optional with the current
system time, default format ('%H:%M:%S %d-%b-%Y') and current locale being used
respectively, if undefined. Default values for the time, format and/or locale may
be specified as named parameters in the use directive.
[% use date(format = '%a %d-%b-%Y', locale = 'fr_FR') %]
When called without any parameters, the format() method returns a string
representing the current system time, formatted by strftime() according to the
default format and for the default locale (which may not be the current one, if
locale is set in the use directive).
[% date.format %]
The plugin allows a time/date to be specified as seconds since the epoch, as is
returned by time().
The time/date can also be specified as a string of the form `h:m:s d/m/y` or
`y/m/d h:m:s`. Any of the characters `:` `/` `-` or space may be used to delimit
fields.
[% use day = date(format => '%A', locale => 'en_GB') %]
[% day.format('4:20:00 9-13-2000') %]
Output:
Tuesday
A format string can also be passed to the format() method, and a locale
specification may follow that.
[% date.format(filemod, '%d-%b-%Y') %]
[% date.format(filemod, '%d-%b-%Y', 'en_GB') %]
Note that in this case, if the local time is not GMT, then also specifying '%Z'
(time zone) in the format parameter will lead to an extremely misleading result.
Any or all of these parameters may be named. Positional parameters should always
be in the order ($time, $format, $locale).
[% date.format(format => '%H:%M:%S') %]
[% date.format(time => filemod, format => '%H:%M:%S') %]
[% date.format(mytime, format => '%H:%M:%S') %]
[% date.format(mytime, format => '%H:%M:%S', locale => 'fr_FR') %]
[% date.format(mytime, format => '%H:%M:%S', gmt => 1) %]
...etc...
The now() method returns the current system time in seconds since the epoch.
App-DocKnot
view release on metacpan or search on metacpan
t/cli/errors.t view on Meta::CPAN
use 5.024;
use autodie;
use warnings;
use POSIX qw(LC_ALL setlocale);
use Test::More tests => 11;
# Isolate from the environment.
setlocale(LC_ALL, 'C');
local $ENV{XDG_CONFIG_HOME} = '/nonexistent';
local $ENV{XDG_CONFIG_DIRS} = '/nonexistent';
# Load the module.
BEGIN { use_ok('App::DocKnot::Command') }
App-DuckPAN
view release on metacpan or search on metacpan
lib/App/DuckPAN/Cmd/Server.pm view on Meta::CPAN
my $self = shift;
my $cache_path = $self->asset_cache_path;
return +{
js => [],
locales => [],
css => [],
templates => [{
name => 'Template Compiling JS',
internal => $cache_path->child('template_compiler.js'),
# stored locally, no need to make web request for this
lib/App/DuckPAN/Cmd/Server.pm view on Meta::CPAN
}
else {
$_->attr('src','/?duckduckhack_js=1');
}
}
elsif ($src =~ /locales/) {
$_->attr('src','/?duckduckhack_locales=1');
}
elsif (substr($src,0,1) eq '/') {
$_->attr('src','http://'.$self->hostname.''.$_->attr('src'));
}
}
lib/App/DuckPAN/Cmd/Server.pm view on Meta::CPAN
name => 'Templating JS',
internal => $cache_path->child($1),
external => $1
};
}
elsif ($src =~ m/^\/(locales(?:.*)\.js)/) {
my $long_path = $1;
my $cache_name = $long_path;
$cache_name =~ s#^.+(\.\d+\.\d+\.js)#locales$1#g; # Turn long path into cacheable name
unshift @{$self->page_info->{locales}},
{
name => 'Locales JS',
internal => $cache_path->child($cache_name),
external => $long_path
};
lib/App/DuckPAN/Cmd/Server.pm view on Meta::CPAN
external => $name
};
}
# Check if we need to request any new assets from hostname, otherwise use cached copies
foreach my $curr_asset (grep { defined $_ && $_->{internal} } map { @{$self->page_info->{$_}} } (qw(js templates css locales))) {
$self->retrieve_and_cache($curr_asset, $from);
}
}
sub retrieve_and_cache {
App-EC2-API-Tools
view release on metacpan or search on metacpan
bin/ec2-api view on Meta::CPAN
exit 1;
fi
find_script;
echo "Please read - http://docs.aws.amazon.com/search/doc-search.html?searchPath=documentation-guide&x=5&y=16&this_doc_product=Amazon+Elastic+Compute+Cloud&this_doc_guide=CLI+Reference&doc_locale=en_us#facet_doc_product=Amazon%20Elastic%20Compute...
exit;
fi;
if [ "$action" = "exec" ]; then
App-EvalServerAdvanced
view release on metacpan or search on metacpan
skel-sandbox/gensystem.sh view on Meta::CPAN
# Install perlbrew, and perl-5.24.1
cat > system/install.sh <<'EOF'
#!/bin/bash
set -e
set -u
apt-get install -y build-essential perlbrew locales
localedef -i en_US -f UTF-8 en_US.UTF-8
export PERLBREW_ROOT=/opt/perlbrew
mkdir -p $PERLBREW_ROOT
perlbrew init
perlbrew install perl-5.24.1
perlbrew switch perl-5.24.1
App-EventStreamr
view release on metacpan or search on metacpan
share/status/app/lib/angular/angular-touch.min.js.map
share/status/app/lib/angular/angular.js
share/status/app/lib/angular/angular.min.js
share/status/app/lib/angular/angular.min.js.map
share/status/app/lib/angular/errors.json
share/status/app/lib/angular/i18n/angular-locale_af-na.js
share/status/app/lib/angular/i18n/angular-locale_af-za.js
share/status/app/lib/angular/i18n/angular-locale_af.js
share/status/app/lib/angular/i18n/angular-locale_am-et.js
share/status/app/lib/angular/i18n/angular-locale_am.js
share/status/app/lib/angular/i18n/angular-locale_ar-001.js
share/status/app/lib/angular/i18n/angular-locale_ar-ae.js
share/status/app/lib/angular/i18n/angular-locale_ar-bh.js
share/status/app/lib/angular/i18n/angular-locale_ar-dz.js
share/status/app/lib/angular/i18n/angular-locale_ar-eg.js
share/status/app/lib/angular/i18n/angular-locale_ar-iq.js
share/status/app/lib/angular/i18n/angular-locale_ar-jo.js
share/status/app/lib/angular/i18n/angular-locale_ar-kw.js
share/status/app/lib/angular/i18n/angular-locale_ar-lb.js
share/status/app/lib/angular/i18n/angular-locale_ar-ly.js
share/status/app/lib/angular/i18n/angular-locale_ar-ma.js
share/status/app/lib/angular/i18n/angular-locale_ar-om.js
share/status/app/lib/angular/i18n/angular-locale_ar-qa.js
share/status/app/lib/angular/i18n/angular-locale_ar-sa.js
share/status/app/lib/angular/i18n/angular-locale_ar-sd.js
share/status/app/lib/angular/i18n/angular-locale_ar-sy.js
share/status/app/lib/angular/i18n/angular-locale_ar-tn.js
share/status/app/lib/angular/i18n/angular-locale_ar-ye.js
share/status/app/lib/angular/i18n/angular-locale_ar.js
share/status/app/lib/angular/i18n/angular-locale_bg-bg.js
share/status/app/lib/angular/i18n/angular-locale_bg.js
share/status/app/lib/angular/i18n/angular-locale_bn-bd.js
share/status/app/lib/angular/i18n/angular-locale_bn-in.js
share/status/app/lib/angular/i18n/angular-locale_bn.js
share/status/app/lib/angular/i18n/angular-locale_ca-ad.js
share/status/app/lib/angular/i18n/angular-locale_ca-es.js
share/status/app/lib/angular/i18n/angular-locale_ca.js
share/status/app/lib/angular/i18n/angular-locale_cs-cz.js
share/status/app/lib/angular/i18n/angular-locale_cs.js
share/status/app/lib/angular/i18n/angular-locale_da-dk.js
share/status/app/lib/angular/i18n/angular-locale_da.js
share/status/app/lib/angular/i18n/angular-locale_de-at.js
share/status/app/lib/angular/i18n/angular-locale_de-be.js
share/status/app/lib/angular/i18n/angular-locale_de-ch.js
share/status/app/lib/angular/i18n/angular-locale_de-de.js
share/status/app/lib/angular/i18n/angular-locale_de-li.js
share/status/app/lib/angular/i18n/angular-locale_de-lu.js
share/status/app/lib/angular/i18n/angular-locale_de.js
share/status/app/lib/angular/i18n/angular-locale_el-cy.js
share/status/app/lib/angular/i18n/angular-locale_el-gr.js
share/status/app/lib/angular/i18n/angular-locale_el.js
share/status/app/lib/angular/i18n/angular-locale_en-as.js
share/status/app/lib/angular/i18n/angular-locale_en-au.js
share/status/app/lib/angular/i18n/angular-locale_en-bb.js
share/status/app/lib/angular/i18n/angular-locale_en-be.js
share/status/app/lib/angular/i18n/angular-locale_en-bm.js
share/status/app/lib/angular/i18n/angular-locale_en-bw.js
share/status/app/lib/angular/i18n/angular-locale_en-bz.js
share/status/app/lib/angular/i18n/angular-locale_en-ca.js
share/status/app/lib/angular/i18n/angular-locale_en-dsrt-us.js
share/status/app/lib/angular/i18n/angular-locale_en-dsrt.js
share/status/app/lib/angular/i18n/angular-locale_en-fm.js
share/status/app/lib/angular/i18n/angular-locale_en-gb.js
share/status/app/lib/angular/i18n/angular-locale_en-gu.js
share/status/app/lib/angular/i18n/angular-locale_en-gy.js
share/status/app/lib/angular/i18n/angular-locale_en-hk.js
share/status/app/lib/angular/i18n/angular-locale_en-ie.js
share/status/app/lib/angular/i18n/angular-locale_en-in.js
share/status/app/lib/angular/i18n/angular-locale_en-iso.js
share/status/app/lib/angular/i18n/angular-locale_en-jm.js
share/status/app/lib/angular/i18n/angular-locale_en-mh.js
share/status/app/lib/angular/i18n/angular-locale_en-mp.js
share/status/app/lib/angular/i18n/angular-locale_en-mt.js
share/status/app/lib/angular/i18n/angular-locale_en-mu.js
share/status/app/lib/angular/i18n/angular-locale_en-na.js
share/status/app/lib/angular/i18n/angular-locale_en-nz.js
share/status/app/lib/angular/i18n/angular-locale_en-ph.js
share/status/app/lib/angular/i18n/angular-locale_en-pk.js
share/status/app/lib/angular/i18n/angular-locale_en-pr.js
share/status/app/lib/angular/i18n/angular-locale_en-pw.js
share/status/app/lib/angular/i18n/angular-locale_en-sg.js
share/status/app/lib/angular/i18n/angular-locale_en-tc.js
share/status/app/lib/angular/i18n/angular-locale_en-tt.js
share/status/app/lib/angular/i18n/angular-locale_en-um.js
share/status/app/lib/angular/i18n/angular-locale_en-us.js
share/status/app/lib/angular/i18n/angular-locale_en-vg.js
share/status/app/lib/angular/i18n/angular-locale_en-vi.js
share/status/app/lib/angular/i18n/angular-locale_en-za.js
share/status/app/lib/angular/i18n/angular-locale_en-zw.js
share/status/app/lib/angular/i18n/angular-locale_en.js
share/status/app/lib/angular/i18n/angular-locale_es-419.js
share/status/app/lib/angular/i18n/angular-locale_es-ar.js
share/status/app/lib/angular/i18n/angular-locale_es-bo.js
share/status/app/lib/angular/i18n/angular-locale_es-cl.js
share/status/app/lib/angular/i18n/angular-locale_es-co.js
share/status/app/lib/angular/i18n/angular-locale_es-cr.js
share/status/app/lib/angular/i18n/angular-locale_es-do.js
share/status/app/lib/angular/i18n/angular-locale_es-ea.js
share/status/app/lib/angular/i18n/angular-locale_es-ec.js
share/status/app/lib/angular/i18n/angular-locale_es-es.js
share/status/app/lib/angular/i18n/angular-locale_es-gq.js
share/status/app/lib/angular/i18n/angular-locale_es-gt.js
share/status/app/lib/angular/i18n/angular-locale_es-hn.js
share/status/app/lib/angular/i18n/angular-locale_es-ic.js
share/status/app/lib/angular/i18n/angular-locale_es-mx.js
share/status/app/lib/angular/i18n/angular-locale_es-ni.js
share/status/app/lib/angular/i18n/angular-locale_es-pa.js
share/status/app/lib/angular/i18n/angular-locale_es-pe.js
share/status/app/lib/angular/i18n/angular-locale_es-pr.js
share/status/app/lib/angular/i18n/angular-locale_es-py.js
share/status/app/lib/angular/i18n/angular-locale_es-sv.js
share/status/app/lib/angular/i18n/angular-locale_es-us.js
share/status/app/lib/angular/i18n/angular-locale_es-uy.js
share/status/app/lib/angular/i18n/angular-locale_es-ve.js
share/status/app/lib/angular/i18n/angular-locale_es.js
share/status/app/lib/angular/i18n/angular-locale_et-ee.js
share/status/app/lib/angular/i18n/angular-locale_et.js
share/status/app/lib/angular/i18n/angular-locale_eu-es.js
share/status/app/lib/angular/i18n/angular-locale_eu.js
share/status/app/lib/angular/i18n/angular-locale_fa-af.js
share/status/app/lib/angular/i18n/angular-locale_fa-ir.js
share/status/app/lib/angular/i18n/angular-locale_fa.js
share/status/app/lib/angular/i18n/angular-locale_fi-fi.js
share/status/app/lib/angular/i18n/angular-locale_fi.js
share/status/app/lib/angular/i18n/angular-locale_fil-ph.js
share/status/app/lib/angular/i18n/angular-locale_fil.js
share/status/app/lib/angular/i18n/angular-locale_fr-be.js
share/status/app/lib/angular/i18n/angular-locale_fr-bf.js
share/status/app/lib/angular/i18n/angular-locale_fr-bi.js
share/status/app/lib/angular/i18n/angular-locale_fr-bj.js
share/status/app/lib/angular/i18n/angular-locale_fr-bl.js
share/status/app/lib/angular/i18n/angular-locale_fr-ca.js
share/status/app/lib/angular/i18n/angular-locale_fr-cd.js
share/status/app/lib/angular/i18n/angular-locale_fr-cf.js
share/status/app/lib/angular/i18n/angular-locale_fr-cg.js
share/status/app/lib/angular/i18n/angular-locale_fr-ch.js
share/status/app/lib/angular/i18n/angular-locale_fr-ci.js
share/status/app/lib/angular/i18n/angular-locale_fr-cm.js
share/status/app/lib/angular/i18n/angular-locale_fr-dj.js
share/status/app/lib/angular/i18n/angular-locale_fr-fr.js
share/status/app/lib/angular/i18n/angular-locale_fr-ga.js
share/status/app/lib/angular/i18n/angular-locale_fr-gf.js
share/status/app/lib/angular/i18n/angular-locale_fr-gn.js
share/status/app/lib/angular/i18n/angular-locale_fr-gp.js
share/status/app/lib/angular/i18n/angular-locale_fr-gq.js
share/status/app/lib/angular/i18n/angular-locale_fr-km.js
share/status/app/lib/angular/i18n/angular-locale_fr-lu.js
share/status/app/lib/angular/i18n/angular-locale_fr-mc.js
share/status/app/lib/angular/i18n/angular-locale_fr-mf.js
share/status/app/lib/angular/i18n/angular-locale_fr-mg.js
share/status/app/lib/angular/i18n/angular-locale_fr-ml.js
share/status/app/lib/angular/i18n/angular-locale_fr-mq.js
share/status/app/lib/angular/i18n/angular-locale_fr-ne.js
share/status/app/lib/angular/i18n/angular-locale_fr-re.js
share/status/app/lib/angular/i18n/angular-locale_fr-yt.js
share/status/app/lib/angular/i18n/angular-locale_fr.js
share/status/app/lib/angular/i18n/angular-locale_gl-es.js
share/status/app/lib/angular/i18n/angular-locale_gl.js
share/status/app/lib/angular/i18n/angular-locale_gsw-ch.js
share/status/app/lib/angular/i18n/angular-locale_gsw.js
share/status/app/lib/angular/i18n/angular-locale_gu-in.js
share/status/app/lib/angular/i18n/angular-locale_gu.js
share/status/app/lib/angular/i18n/angular-locale_he-il.js
share/status/app/lib/angular/i18n/angular-locale_he.js
share/status/app/lib/angular/i18n/angular-locale_hi-in.js
share/status/app/lib/angular/i18n/angular-locale_hi.js
share/status/app/lib/angular/i18n/angular-locale_hr-hr.js
share/status/app/lib/angular/i18n/angular-locale_hr.js
share/status/app/lib/angular/i18n/angular-locale_hu-hu.js
share/status/app/lib/angular/i18n/angular-locale_hu.js
share/status/app/lib/angular/i18n/angular-locale_id-id.js
share/status/app/lib/angular/i18n/angular-locale_id.js
share/status/app/lib/angular/i18n/angular-locale_in.js
share/status/app/lib/angular/i18n/angular-locale_is-is.js
share/status/app/lib/angular/i18n/angular-locale_is.js
share/status/app/lib/angular/i18n/angular-locale_it-it.js
share/status/app/lib/angular/i18n/angular-locale_it-sm.js
share/status/app/lib/angular/i18n/angular-locale_it.js
share/status/app/lib/angular/i18n/angular-locale_iw.js
share/status/app/lib/angular/i18n/angular-locale_ja-jp.js
share/status/app/lib/angular/i18n/angular-locale_ja.js
share/status/app/lib/angular/i18n/angular-locale_kn-in.js
share/status/app/lib/angular/i18n/angular-locale_kn.js
share/status/app/lib/angular/i18n/angular-locale_ko-kr.js
share/status/app/lib/angular/i18n/angular-locale_ko.js
share/status/app/lib/angular/i18n/angular-locale_ln-cd.js
share/status/app/lib/angular/i18n/angular-locale_ln.js
share/status/app/lib/angular/i18n/angular-locale_lt-lt.js
share/status/app/lib/angular/i18n/angular-locale_lt.js
share/status/app/lib/angular/i18n/angular-locale_lv-lv.js
share/status/app/lib/angular/i18n/angular-locale_lv.js
share/status/app/lib/angular/i18n/angular-locale_ml-in.js
share/status/app/lib/angular/i18n/angular-locale_ml.js
share/status/app/lib/angular/i18n/angular-locale_mr-in.js
share/status/app/lib/angular/i18n/angular-locale_mr.js
share/status/app/lib/angular/i18n/angular-locale_ms-my.js
share/status/app/lib/angular/i18n/angular-locale_ms.js
share/status/app/lib/angular/i18n/angular-locale_mt-mt.js
share/status/app/lib/angular/i18n/angular-locale_mt.js
share/status/app/lib/angular/i18n/angular-locale_nl-cw.js
share/status/app/lib/angular/i18n/angular-locale_nl-nl.js
share/status/app/lib/angular/i18n/angular-locale_nl-sx.js
share/status/app/lib/angular/i18n/angular-locale_nl.js
share/status/app/lib/angular/i18n/angular-locale_no.js
share/status/app/lib/angular/i18n/angular-locale_or-in.js
share/status/app/lib/angular/i18n/angular-locale_or.js
share/status/app/lib/angular/i18n/angular-locale_pl-pl.js
share/status/app/lib/angular/i18n/angular-locale_pl.js
share/status/app/lib/angular/i18n/angular-locale_pt-br.js
share/status/app/lib/angular/i18n/angular-locale_pt-pt.js
share/status/app/lib/angular/i18n/angular-locale_pt.js
share/status/app/lib/angular/i18n/angular-locale_ro-ro.js
share/status/app/lib/angular/i18n/angular-locale_ro.js
share/status/app/lib/angular/i18n/angular-locale_ru-ru.js
share/status/app/lib/angular/i18n/angular-locale_ru.js
share/status/app/lib/angular/i18n/angular-locale_sk-sk.js
share/status/app/lib/angular/i18n/angular-locale_sk.js
share/status/app/lib/angular/i18n/angular-locale_sl-si.js
share/status/app/lib/angular/i18n/angular-locale_sl.js
share/status/app/lib/angular/i18n/angular-locale_sq-al.js
share/status/app/lib/angular/i18n/angular-locale_sq.js
share/status/app/lib/angular/i18n/angular-locale_sr-cyrl-rs.js
share/status/app/lib/angular/i18n/angular-locale_sr-latn-rs.js
share/status/app/lib/angular/i18n/angular-locale_sr.js
share/status/app/lib/angular/i18n/angular-locale_sv-se.js
share/status/app/lib/angular/i18n/angular-locale_sv.js
share/status/app/lib/angular/i18n/angular-locale_sw-tz.js
share/status/app/lib/angular/i18n/angular-locale_sw.js
share/status/app/lib/angular/i18n/angular-locale_ta-in.js
share/status/app/lib/angular/i18n/angular-locale_ta.js
share/status/app/lib/angular/i18n/angular-locale_te-in.js
share/status/app/lib/angular/i18n/angular-locale_te.js
share/status/app/lib/angular/i18n/angular-locale_th-th.js
share/status/app/lib/angular/i18n/angular-locale_th.js
share/status/app/lib/angular/i18n/angular-locale_tl.js
share/status/app/lib/angular/i18n/angular-locale_tr-tr.js
share/status/app/lib/angular/i18n/angular-locale_tr.js
share/status/app/lib/angular/i18n/angular-locale_uk-ua.js
share/status/app/lib/angular/i18n/angular-locale_uk.js
share/status/app/lib/angular/i18n/angular-locale_ur-pk.js
share/status/app/lib/angular/i18n/angular-locale_ur.js
share/status/app/lib/angular/i18n/angular-locale_vi-vn.js
share/status/app/lib/angular/i18n/angular-locale_vi.js
share/status/app/lib/angular/i18n/angular-locale_zh-cn.js
share/status/app/lib/angular/i18n/angular-locale_zh-hans-cn.js
share/status/app/lib/angular/i18n/angular-locale_zh-hk.js
share/status/app/lib/angular/i18n/angular-locale_zh-tw.js
share/status/app/lib/angular/i18n/angular-locale_zh.js
share/status/app/lib/angular/i18n/angular-locale_zu-za.js
share/status/app/lib/angular/i18n/angular-locale_zu.js
share/status/app/lib/angular/version.json
share/status/app/lib/angular/version.txt
share/status/app/lib/bootstrap/bootstrap.js
share/status/app/lib/bootstrap/bootstrap.min.js
share/status/app/lib/bootstrap/jquery.js
App-Fetchware
view release on metacpan or search on metacpan
path. Now a temp file is used instead.
- Switch use of $^X to $Config{perlpath}, which solves some bugs in some
smoker configurations.
- Fixed a hilarious bug due to localizations. I used a direct string
comparison where $! was in the string, and I guess under different
locales you can get languages other than english to come from using $!
in a string.
1.012 2014-09-05 21:23:55-04:00 America/New_York
- Fixed botched use of $ENV{AUTOMATED_TESTING} to skip the interactive new
command tests.
App-Followme
view release on metacpan or search on metacpan
- Replace MarkdownData with TextData, which generalizes it
- All tests initialize top_directory and base_directory before running
- Small changes to documentation
2.00 2021-03-05T12:45:20Z
- Revised test of format_date to be locale independent
- Removed help directory from initial install and its tests in ZFunctional.t
1.99 2021-03-01T13:06:28Z
- Converted Guide.pod to Guide.pm so that it is installed properly
- Fixed bugs in UploadSite.pm
- Removed cwd and getcwd from software and tests where it was not needed
- Create one level of directory when writing file if not present
1.97 2021-02-17T14:10:47Z
- Modified test for format_date to work with different locales
- Rewrote ConvertPage.pm to us object polymorphism when creating files
- Rewrote PodData.pm to write help files to a single existing directory
- Made Image::Size a required package
1.96 2021-02-04T13:55:26Z
App-GHGen
view release on metacpan or search on metacpan
scripts/generate_index.pl view on Meta::CPAN
med_threshold => 90,
max_points => 10, # Only display the last 10 commits in the coverage trend graph
cover_db => 'cover_db/cover.json',
output => 'cover_html/index.html',
max_retry => 3,
min_locale_samples => 3,
);
# -------------------------------
# Dependency correlation analysis
# -------------------------------
scripts/generate_index.pl view on Meta::CPAN
text-decoration: underline;
}
.notice.perl-version-cliff a:hover {
text-decoration: none;
}
.notice.locale-cliff {
border-left: 4px solid #d97706;
background: #fffbeb;
padding: 0.5em 1em;
}
.notice.rt-issues {
scripts/generate_index.pl view on Meta::CPAN
perl_series => {},
os => {},
perl_os => {},
);
my %locale_stats;
for my $r (@fail_reports) {
my $perl = perl_series($r->{perl});
my $os = $r->{osname} // 'unknown';
scripts/generate_index.pl view on Meta::CPAN
$clusters{os}{$os}++;
$clusters{perl_os}{"$perl / $os"}++ if $perl;
if(lc($r->{grade} // '') eq 'fail') {
# Don't include NA or Unknown in this list
my $locale = extract_locale($r) // 'unknown';
$locale_stats{$locale}{fail}++;
}
}
my @top_perl_series = sort { $clusters{perl_series}{$b} <=> $clusters{perl_series}{$a} }
keys %{ $clusters{perl_series} };
scripts/generate_index.pl view on Meta::CPAN
);
}
push @html, '</ul>';
my @locale_clusters;
for my $r (@pass_reports) {
my $locale = extract_locale($r) // 'unknown';
$locale_stats{$locale}{pass}++;
}
for my $loc (keys %locale_stats) {
next if $loc eq 'unknown';
my $fail = $locale_stats{$loc}{fail} // 0;
my $pass = $locale_stats{$loc}{pass} // 0;
my $total = $fail + $pass;
next if $total < $config{min_locale_samples};
my $ratio = $fail / $total * 100;
if ($ratio >= $config{low_threshold} && is_non_english_locale($loc)) {
push @locale_clusters, {
locale => $loc,
fail => $fail,
pass => $pass,
ratio => $ratio,
};
}
}
if(scalar(@locale_clusters)) {
push @html,
'<h3>Locale-sensitive failures detected</h3>',
'<div class="notice locale-cliff">',
'<ul>';
foreach my $locale(@locale_clusters) {
push @html, "<li><code>$locale->{locale}</code> - $locale->{fail} FAIL / $locale->{pass} PASS ($locale->{ratio}%)</li>";
}
push @html, '</ul>', '</div>';
}
my @fail_perl_versions = extract_perl_versions(\@fail_reports);
scripts/generate_index.pl view on Meta::CPAN
return $1;
}
return;
}
sub extract_locale {
my $r = $_[0];
# Preferred: explicit environment
for my $k (qw(LANG LC_ALL LC_CTYPE)) {
if (my $v = $r->{env}{$k}) {
scripts/generate_index.pl view on Meta::CPAN
if($report->{result}->{output}->{uncategorized} =~ /\b([a-z]{2}_[A-Z]{2})\b/) {
return $1;
}
}
sub is_non_english_locale {
my $locale = $_[0];
return 0 unless $locale;
# Treat C / POSIX / en_* as English
return 0 if $locale =~ /^(C|POSIX|en(_|$))/i;
return 1;
}
sub parse_version {
scripts/generate_index.pl view on Meta::CPAN
],
perldelta => "https://perldoc.perl.org/perldelta$min_pass",
};
}
sub detect_locale_root_cause {
my ($reports, $config) = @_;
my %count;
my $total = 0;
for my $r (@$reports) {
# Can get FPs if we take NA or Unknown into account
if(lc($r->{grade} // '') eq 'fail') {
my $loc = extract_locale($r) or next;
next if $loc =~ /^en_/i;
$count{$loc}++;
$total++;
}
}
scripts/generate_index.pl view on Meta::CPAN
for my $loc (keys %count) {
my $ratio = $count{$loc} / $total;
next unless $ratio >= ($config->{low_threshold} / 100);
return {
type => 'locale',
label => "Locale-sensitive behavior ($loc)",
confidence => sprintf("%.2f", $ratio),
evidence => [
"$count{$loc}/$total failures with LANG=$loc",
'English locales show fewer or no failures',
],
};
}
return;
scripts/generate_index.pl view on Meta::CPAN
sub detect_root_causes {
my (%args) = @_;
my @hints;
push @hints, detect_os_root_cause($args{fail_reports}, \%config) if $args{fail_reports};
push @hints, detect_locale_root_cause($args{fail_reports}, \%config);
if ($args{fail_perl_versions} && $args{pass_perl_versions}) {
push @hints,
detect_perl_version_root_cause(
$args{fail_perl_versions},
App-Gimei
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
Carp 0
ExtUtils::MakeMaker 0
HTTP::Date 6
HTTP::Headers::Util 6
HTTP::Request 0
locale 0
perl 5.008001
strict 0
HTTP-Date-6.06
pathname: O/OA/OALDERS/HTTP-Date-6.06.tar.gz
provides:
App-GitGerrit
view release on metacpan or search on metacpan
lib/App/GitGerrit.pm view on Meta::CPAN
use utf8;
use 5.010;
use strict;
use warnings;
use locale ':not_characters';
# The following incantation is here to avoid this bug:
# https://rt.perl.org/rt3/Public/Bug/Display.html?id=63402
my $encoding;
BEGIN {
if ($^O eq 'MSWin32') {
require Win32;
my $cp = Win32::GetConsoleCP();
$encoding = ":encoding(cp$cp)";
} else {
$encoding = ':locale';
}
}
use open ':std', $encoding;
package App::GitGerrit;
( run in 2.224 seconds using v1.01-cache-2.11-cpan-5a3173703d6 )