I think there is a misunderstanding on your side. What do you think does the line

extends(qw/transaction_type/);
[download]

for you? What do you expect?

The line says that the class/package 'Monro::CC' is inheriting from class/package 'transaction_type'. But I assume you don't want this.

McA

From what I understand it should load the transaction_type class. But, when I do not include this, I get an error stating 'Can't locate object method "_mk_accessors" via package "Monro::CC" at C:/Perl/lib/Class/Accessor.pm line 36.' When I originally came across this error I consulted the documentation for Class::Accessor, and in the 'Moose!' subsection it says you should use extends instead of changing @ISA directly. Why this is: I have no idea, but it does result in not getting the aforementioned error message.

Okay, I think I got this...

What I did was remove all of the extends and all of the Exporter stuff altogether. New code:

package Monro::CC;

use strict;
use warnings;

use Class::Accessor "antlers";

has 'transaction_type' => (
    is => 'rw',
);
[download]

And the script:

#!/usr/bin/perl

use strict;
use warnings;

use Monro::CC;

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