ひらがな→カタカナ変換で、tr/ぁ-ん/ァ-ン/が動かない件について

下記コードがタ行以降で化ける。

use strict;
use warnings;
use 5.12.0;
use Encode;

sub conv_kana(){
    my $string = shift;
    $string = Encode::encode('utf8',Encode::decode('sjis',$string));
    $string =~ tr/ぁ-ん/ァ-ン/;
    #$string = Encode::encode('sjis',Encode::decode('utf8' ,$string));
    return $string;
}

引数はShiftJIS文字列。誰か教えて！