12/04/17 23:18:00.38 DznGe3OV0 BE:4356858-PLT(23506)
if ($Proxy_Port ne "FFFF" and $socks eq '1'){
$UserAgent->proxy(['http', 'https'], "socks://$dest_HOST:$Proxy_Port/"); # socksの時。
}
elsif ($Proxy_Port ne "FFFF"){
$UserAgent->proxy(['http'], "URLﾘﾝｸ($dest_HOST:$Proxy_Port)");
}
else {
# 逆引き、正引きできない時は直書き
}
こんな風に描いています。