M5WS7Z65RUSP3MZNYGZCL7NFFSVUQHBVOFYKX46H5NB4P36BSP6AC use strict;use warnings;use Setup;use Test2::V0;use Hydra::Helper::CatalystUtils;subtest "trim" => sub {my %values = ("" => "","š®" => 'š®'," š®" => 'š®',"š® " => 'š®'," š® " => 'š®',"\nš® " => 'š®',"\n\tš®\n\n\t" => 'š®',);for my $input (keys %values) {my $value = $values{$input};is(trim($input), $value, "Trim the value: " . $input);}my $uninitialized;is(trim($uninitialized), '', "Trimming an uninitialized value");};done_testing;