perl ws-make %1