open FILE,"config.txt" or die "cannot open file : $!";
my $interface; # declare the variable
while(<FILE>) {
 
 $interface = $1 if /^([\S]+)/;
 print "$interface => $1\n" if /inet addr:([0-9.]+)/;
 
}