Btw: if you want to set a background image under Win32 (tested with WinXP), you could use something like the following code:
use Win32::API;
use constant SPI_SETDESKWALLPAPER => 20;
use constant SPIF_UPDATEANDSENDINI => 3;
my $image = "c:\\images\\image.bmp";
my $syspinf = Win32::API->new('user32','SystemParametersInfo',
[ qw(I I P I) ], 'I')
or die "Could not import function.\n";
$syspinf->Call(SPI_SETDESKWALLPAPER, 0, $image, SPIF_UPDATEANDSENDINI)
+;
Best regards,
perl -e "s>>*F>e=>y)\*martinF)stronat)=>print,print v8.8.8.32.11.32"