$variable =~ tr~/\~~d;