Re: Perl. Необходимо получить аргумент из командной строки

unless (@ARGV == 3) {die "" ;}
($EHT, $IBD, $PT) = @ARGV;