# config file
sub initConfig {
    $foo = "$user - bar";
    # ... whatever...
}

##</code><code>##

# program
require 'configuration_file';
print "Username:";
chomp($user = <STDIN>);
# now $user exists, although you'd wanna check it for validity
&initConfig();
# ... continue processing...