ポート番号からサービス情報を取得する
getservbyport
は、PORT に指定したポート番号と
PROTO に指定した下位プロトコル名から、システムに対して該当のサービス情報を要求します。
スカラーコンテキストなら、getservbyport
はサービス名を返します。
もし該当のサービスが見つからなければ undef
を返します。
my $name = getservbyport( 110, 'tcp' );
if ( defined $name ) {
print $name, "\n"; # pop3
}
getservbyport
はリストコンテキストなら次のようにプロトコル情報をリストで返します。
# 0 1 2 3
my ( $name, $aliases, $port, $proto ) = getservbyport( 110, 'tcp' );
No. | 変数 | 意味 | 実例 |
---|---|---|---|
0 | $name |
サービス名 | pop3 |
1 | $aliases |
エイリアス (別名) | pop-3 |
2 | $port |
ポート番号 | 110 |
3 | $proto |
下位プロトコル名 | tcp |