package SugarTrail::STS; # STS holder # new() use strict; use warnings; use Carp; sub new { my $class = shift; my $args = shift; my $self = {}; $self->{args} = $args; return bless $self, $class; } 1;