sub GETSHIT {
    sub workder {
        $ips = shift;
...