open my $input, '+<', 'file...';