1Locale::Utils::PlaceholUdseerrNaCmoendt(r3i)buted Perl DLooccuamleen:t:aUttiiolns::PlaceholderNamed(3)
2
3
4
6 Locale::Utils::PlaceholderNamed - Utils to expand named placeholders
7
8 $Id: PlaceholderNamed.pm 667 2017-07-16 10:46:35Z steffenw $
9
10 $HeadURL:
11 svn+ssh://steffenw@svn.code.sf.net/p/perl-gettext-oo/code/Locale-Utils-PlaceholderNamed/trunk/lib/Locale/Utils/PlaceholderNamed.pm
12 $
13
15 1.004
16
18 use Locale::Utils::PlaceholderNamed;
19
20 my $obj = Locale::Utils::PlaceholderNamed->new(
21 # optional is_strict switch
22 is_strict => 1,
23 # optional modifier code
24 modifier_code => sub {
25 my ( $value, $attribute ) = @_;
26 return
27 $attribute eq '%.3f'
28 ? sprintf($attribute, $value)
29 : $attribute eq 'accusative'
30 ? accusative($value)
31 : $value;
32 },
33 );
34
35 $expanded = $obj->expand_named($text, %args);
36 $expanded = $obj->expand_named($text, \%args);
37
39 Utils to expand named placeholders.
40
42 method new
43 see SYNOPSIS
44
45 method is_strict
46 If is_strict is false: undef will be converted to q{}. If is_strict is
47 true: no replacement.
48
49 $obj->is_strict(1); # boolean true or false;
50
51 method modifier_code, clear_modifier_code
52 The modifier code handles named attributes to modify the given
53 placeholder value.
54
55 If the placeholder name is "{foo:bar}" then foo is the placeholder name
56 and bar the attribute name. Space in front of the attribute name is
57 allowed, e.g. "{foo :bar}".
58
59 my $code_ref = sub {
60 my ( $value, $attribute ) = @_;
61 return
62 $attribute eq 'num.03'
63 ? sprintf('%.03f, $value)
64 : $attribute eq 'accusative'
65 ? accusative($value)
66 : $value;
67 };
68 $obj->modifier_code($code_ref);
69
70 To switch off this code - clear them.
71
72 $obj->clear_modifier_code;
73
74 method expand_named
75 Expands strings containing named placeholders like "{name}".
76
77 $text = 'foo {name} baz';
78 %args = (
79 name => 'bar',
80 );
81
82 $expanded = $obj->expand_named($text, %args);
83
84 or
85
86 $expanded = $obj->expand_text($text, \%args);
87
89 Inside of this distribution is a directory named javascript. For more
90 information see: Locale::TextDomain::OO::JavaScript
91
92 This script depends on <http://jquery.com/>.
93
95 Inside of this distribution is a directory named example. Run the *.pl
96 files.
97
99 none
100
102 none
103
105 Carp
106
107 Moo
108
109 MooX::StrictConstructor
110
111 MooX::Types::MooseLike
112
113 namespace::autoclean
114
116 not known
117
119 not known
120
122 <http://en.wikipedia.org/wiki/Gettext>
123
124 Locale::TextDomain
125
127 Steffen Winkler
128
130 Copyright (c) 2011 - 2017, Steffen Winkler "<steffenw at cpan.org>".
131 All rights reserved.
132
133 This module is free software; you can redistribute it and/or modify it
134 under the same terms as Perl itself.
135
136
137
138perl v5.36.0 2022-07-22Locale::Utils::PlaceholderNamed(3)