$tparse=split(/-/,$current);