$somestring =~ $character_tests{var1};