文字と長さのためにperlのユーザ入力を確認する

Question

私の質問は基本的にはタイトルの通りです。どのように私は、文字列

1. 、ユーザが入力したかどうか、perlで、確認することができますが、長いだけで、特定の文字である
   （例えば、3文字）
2. は文字のみが含まれている（例えば、それは文字だけ含まれている必要があります " U」、 ''、 'G'、及び 'C'）

Answer 1

my $input = <>; 
if ($input =~ /^[uagc]{3}$/g){ 
    # your codes 
} else { 
    #exit or die; 
} 

Answer 2

$s =~ /^[uagc]{3}\z/ 
    or die("usage\n");