I keep getting the below warning

Use of uninitialized value in hash element at hash_construct.pl line 15, <$fh> line 909. Use of uninitialized value in concatenation (.) or string at hash_construct.pl line 11, <$fh> line 910.

#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
my %hash;
 open my $fh, '<', $ARGV[0] or die "could not open $ARGV[0]'' $!";
while (my $line = <$fh>)
{
$line =~/;(.*)\s-\s/; 
my $key = $1; 
print "KEY:$key\n";
$line =~/\.\\(.*)-/;
my $value = $1;
print "VALUE:$value\n";
$hash{$key}=$value; 
}
print Dumper(\%hash);
[download]