Thanks! Yeah I use Crypt::CBC in conjunction just so you don't have to worry about padding to get the proper blocksize. From what I can tell from the documentation, while Crypt::OpenSSL::AES will support keysizes of 16, 24, or 32 bytes... if you use it with Crypt::CBC it will always be 32 bytes. As suggested I verified this with the keysize routine:
use Crypt::CBC;
use Crypt::OpenSSL::AES;
my $cipher = Crypt::CBC->new( -key => '1234567890123456',
-cipher => 'Crypt::OpenSSL::AES',
-header => 'none',
-iv => '6543210987654321' );
print $cipher->keysize();
Again this will ALWAYS returns 32, or 256 bits.