#!/usr/bin/perl
my $myself = 'svenXYtest';
$0 = $myself; # change my name
sleep 60; # to actually have time to look at ps'es output