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();
[download]

Again this will ALWAYS returns 32, or 256 bits.