Simply use

my $bmp = Wx::Bitmap->new($image);
[download]

If it doesn't work, you'll get an error, if it does, you won't :)

C:\>perl -MWx -e"warn Wx::Bitmap->new(Wx::Image->new)"
Wx::Bitmap=SCALAR(0x22516c) at -e line 1.

C:\>
[download]

The wxPerl wxBitmap documentation ought to say its supported, but I've got an outdated version, so I can't check.

Since this wasn't available in early wxPerl's, you should

use Wx 0.25;
[download]