chomp (my $vlnum = <STDIN>);