perl 특수 문자 제거

$trans_no =~ s/[\/;\[\]\<\>&\t\r\n]//g;

ㅎㅎ