+sub abs {
+ my $self = shift;
+ my $var = shift;
+
+ return $var < 0 ? $var * -1 : $var;
+}
+
+sub t8 {
+ my ($self, $text, $args) = @_;
+ $self->{locale} ||= Locale->new($::myconfig{countrycode}, 'all');
+ return $self->{locale}->text($text, @args) || $text;
+}
+