// Load an Image
wxImage image(wxT("image.png"), wxBITMAP_TYPE_PNG);
// Convert it to a bitmap
wxBitmap bitmap(image);
##</code><code>##

#! /home/xxxx/CitrusPerl/perl/bin/perl
# Note I prefer to point to my CitrusPerl install rather than running a shell script everytime I want to run perl.
# Image test - image manipulation
use strict;
use warnings;
use 5.014;

package MyForm;	# -----------------------------------------  package MyForm::
use strict;
use warnings;
use Wx qw[:everything]; 
use Wx::Event qw(EVT_BUTTON );
use parent -norequire, 'Wx::Frame';
use Wx qw(:id :toolbar :statictext wxNullBitmap wxDefaultPosition wxDefaultSize wxNullBitmap
					wxTB_VERTICAL wxSIZE wxBITMAP_TYPE_ANY wxBITMAP_TYPE_BMP);
sub new { 			#1 ---------------------------	new MyForm::
my $class = shift;
my %parms = @_;
my $self = $class->SUPER::new(
     undef,	-1, 'Image test', 
     wxDefaultPosition, 	# position
     wxDefaultSize, 	# size
   );
my ( $img, $sb, $sizer);
my $panel = Wx::Panel->new(
        $self, -1,          # parent window, ID
		  wxDefaultPosition, wxDefaultSize);
	$panel->SetBackgroundColour(Wx::Colour->new('light blue'));
my $welcome = Wx::StaticText->new($panel, -1, 'Welcome to Image test',
																								[150, 250], [-1, -1], wxALIGN_CENTER);
$sizer = Wx::BoxSizer->new(wxVERTICAL);
Wx::InitAllImageHandlers;						# Added
$img = Wx::Image->new($parms{image_fname}, wxBITMAP_TYPE_ANY);
my $bmp = Wx::Bitmap->new($img);					# Added
$sb = Wx::StaticBitmap->new($panel, -1, $bmp);				# changed
$sizer->Add( $welcome, 0, wxALL | wxEXPAND, 5 );
$sizer->Add( $sb, 0, wxALL | wxEXPAND, 5 );
$panel->SetSizer($sizer);
$panel->Fit;
  return $self;
}	#1 end sub new MyForm::
1; 
# end package MyForm

package main;			# -----------------------------  package main::
use strict;
use warnings;
use 5.014;
my $image_file = '/home/xxxx/CitrusPerl/perl/citrus/lib/Wx/DemoModules/files/splash/logo.jpg'; # Changed
my $app = Wx::SimpleApp->new;
my $frame = MyForm->new( image_fname => $image_file);
$frame->Show(1);
$app->MainLoop;

1;