$plat = "asdfb\tssf";
use Data::Dumper;
$Data::Dumper::Useqq=1;
$Data::Dumper::Terse=1;
print "Platform: ", Dumper($plat), "\n";