Which part of 'Access Denied' is confusing you ;-) You need to use a valid username and password.

$user="DOM\username"  # bound to fail

$user="DOM\\username" # OK
$user='DOM\username'  # OK as well
[download]

Once you fix that tt should work as the SWbemLocator you need running remotely provided that error. You do need valid credentials though. This works fine for me:

use Win32::KillProcess ':all';
my $server = "Toshiba";
my $user   = "WORKGROUP\\Administrator";
my $pass   = "password";
my $c      = connectServer( $server, $user, $pass );
showRunningProcess($c);
[download]