Extract variable length numbers (tab delimitered) from a string?

[sln]

The line of code was:

next if /^#/;

The input file looks like this:

#User's name
username=Joe
#User's password
password=secret

The input file is constructed from user input reading from a script
like this:

print "Enter your user name: ";
chomp($username = <STDIN>);
print "Enter your password: ";
chomp($password = <STDIN>);

My 'fix' was to make a double sharp (##) the comment character. Some
day, a user will enter a value beginning with a double sharp, and that
will be another 'bug' that testing didn't uncover.

CC.

next if "#User's password" =~ /^#/; passes

next if "password=#secret" =~ /^#/; fails

-sln