system("perl ./servo/load.pl");
sleep 2;
for($tag = 1; $tag <= 12; $tag++) 
{
$t = $tag < 10 ? $t = "0".$tag : $tag;
system("perl ./servo/$t.pl");
sleep 2;
}