local($/) = undef;

my $File;
open $File, "<PATH";

binmode $File;

my $IMG = <$File>;

close $File;

my $Image = Wx::Image->new( $IMG, wxBITMAP_TYPE_JPEG );