ネットワークデバイス等のホスト名等を Perl で扱う場合に、大文字小文字が混在していたりして、扱いが困る場合があります。
そういう場合は、lc(小文字変換)及びuc(大文字変換)の関数が使えます。
$hostname = "RouTer1"; $hostname = lc $hostname;
とすると、$hostname = “router1” となります。
$hostname = "rOUter1"; $hostname = uc $hostname;
とすると、$hostname = “ROUTER1” となります。
正規表現の tr を使っても実現できますが、覚えてしまえば上記が楽かなぁと個人的には思います。