perl -e '$p=qr!(?:0|1\d{0,2}|2(?:[0-4]\d?|5[0-5]?|[6-9])?|[3-9]\d?)!;print((shift=~m/^$p\.$p\.$p\.$p$/)?1:0);' 123.123.123.123
Эта команда использует Perl для проверки, является ли заданный аргумент действительным IP-адресом. Она разбивает IP-адрес на отдельные октеты, проверяя их диапазоны значений. Если аргумент соответствует формату IP-адреса, команда вернет «1», иначе «0». Альтернативой может быть использование специализированных инструментов или регулярных выражений в других языках программирования для выполнения аналогичной проверки.