package WebCoso::Step::Step1;
use base 'WebCoso::Step::Base';
use Class::Std;
use strict;
use warnings;

{
my %calls_of :ATTR(:default<[]> :get<calls>);
my %p1_of :ATTR(:init_arg<p1>);

sub process {
    my ($self,$resource,$stage)=@_;

    my $out='stuff';

    push @{$calls_of{ident $self}},{
        resource => $resource,
        out_res => $out,
        stage => $stage,
    };

    return $out;
}

}
1;