$char =~ s/^(0)+//;