$ID =~ s/.//s;   # No s modifier needed if the first char won't be a newline