... Комментарием в Perl является все, что следует за «решеткой» (#), вплоть до конца строки. ... Пример программы на Perl #!/usr/local/bin/perl @passwords = qw (inet basic net); print ”Enter the login: ”; $login = ; chomp ($login); if ($login eq ”Root”) { print ”Hello, Administrator! ... В рассматриваемом случае массив @passwords включает три элемента: inet, basic, net. ... Наличие значения переменной $pass среди элементов массива @passwords проверяет $passwords[$i] eq $pass. ...