Select Code to Download

while ($x != $limit) {        
        foreach $x (@icpList) {
...
            pstswlog($x);
            warn "pstswlog executed";
        }