NAME Petal::Utils - Useful template modifiers for Petal. SYNOPSIS # install the default set of Petal modifiers: use Petal::Utils; # you can also install modifiers manually: Petal::Utils->install( 'some_modifier', ':some_set' ); # see below for modifiers available & template syntax DESCRIPTION The Petal::Utils package contains commonly used Petal modifiers (or plugins), and bundles them with an easy-to-use installation interface. By default, a set of modifiers are installed into Petal when you use this module. You can change which modifiers are installed by naming them after the use statement: # use the default set: use Petal::Utils qw( :default ); # use the date set of modifiers: use Petal::Utils qw( :date ); # use only named modifiers, plus the debug set: use Petal::Utils qw( UpperCase Date :debug ); # don't install any modifiers use Petal::Utils qw(); You'll find a list of plugin sets throughout this document. You can also get a complete list by looking at the variable: %Petal::Utils::PLUGIN_SET; For details on how the plugins are installed, see the "Advanced Petal" section of the Petal documentation. MODIFIERS Each modifier is listed under the set it belongs to. :text lowercase:, lc: $string Make the entire string lowercase.

lower

uppercase:, uc: $string Make the entire string uppercase.

upper

uc_first: $string Make the first letter of the string uppercase.

uc_first

:date date: $date Convert a time() integer to a date string using Date::Format. Jan 1 1970 01:00:01 us_date: $date Convert an international date stamp (e.g., yyyymmdd, yyyy-mm-dd, yyyy/mm/dd) to US format (mm/dd/yyyy).

2003-09-05

:logic if: $expr1 then: $expr2 else: $expr3 Do an if/then/else test and return the value of the expression executed. Truthfulness of $expr1 is according to Perl (e.g., non-zero, non-empty string).

Some text here...

or: $expr1 $expr2 Do a logical or. Truthfulness is according to Perl (e.g., non-zero, non-empty string).

first or second = or

and: $expr1 $expr2 Do a logical and. Truthfulness is according to Perl (e.g., non-zero, non-empty string). first and second = and equal:, eq: $expr1 $expr2 Test for equality. Numbers are compared with "==", strings with "eq". Truthfulness is according to Perl (e.g., non-zero, non-empty string). first eq second = equal like: $expr $regex Test for equality to a regular expression (see perlre). name like regex = like :list sort: $list Sort the values in a list before returning it. :hash keys: $hash Return a list of keys for a hashref. Note: It appears that values cannot be accessed with dynamic keys. If you need the keys and values, use "each:". each: $hash Return a list of key/value pairs for a hashref. :uri uri_escape: $expr Use URI::Escape's uri_escape() to escape the return value of the expression. get $item/key :debug dump: $expr Dump the data strcture of the value given. dump name: dump SUPERSETS At the time of writing, the following supersets were available: ':none' => [], ':all' => [qw( :default :hash :debug )], ':default' => [qw( :text :date :logic :list )], See %Petal::Utils::PLUGIN_SET for an up-to-date list. AUTHORS William McKee , and Steve Purkis COPYRIGHT Copyright (c) 2003-2004 William McKee & Steve Purkis. This module is free software and is distributed under the same license as Perl itself. Use it at your own risk. THANKS Thanks to Jean-Michel Hiver for making Petal available to the Perl community. SEE ALSO Petal