package Monro::CC;

use strict;
use warnings;

use Class::Accessor "antlers";

extends(qw/transaction_type/); 

has transaction_type => (
    is => 'rw',
);

##</code><code>##

#!/usr/bin/perl

use strict;
use warnings;

use Monro::CC;

my $transaction_info = read_psin();
my @transaction_info = @{$transaction_info};

my $trans_obj = Monro::CC->new(
    transaction_type => $transaction_info[0],
);