[問題] 次數計算

[b13b46o2 (買槍買裝備)]

$ANS=1234 ;

$count = $ANS =~ tr/1234// ;

print "$count\n";

請問tr後面有辦法帶入自己想要的變數嗎？
google了好久

$ANS=1234 ;
print "Please enter your number.\n";
chomp ($num=<STDIN>);
$count = $ANS =~ tr/// ;
print "$count\n";

tr後面該怎麼改才有辦法讓＄num帶入

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.130.49.110
※ 文章網址: http://www.ptt.cc/bbs/Perl/M.1417070897.A.FA2.html