. ./set_serial
nohup perl currentcost.pl >> /dev/null &