unlink($0) or warn $!,$/,$^E,$/;