Почему Perl предупреждает, что открыть мой $ fh, в $ файле отсутствуют круглые скобки?

Это мой первый день работы с Perl, и я нахожу это предупреждение очень сбивающим с толку.

Отсутствуют круглые скобки вокруг «моего» списка в ./grep.pl, строка 10.

Это кажется,

open FILE, $file;

работает нормально.

Что не так с

open my $fh, $file;

Спасибо!

#!/usr/bin/perl

use strict;
use warnings;

sub grep_all {
        my $pattern = shift;

        while (my $file = shift) {
                open my $fh, $file;
                while (my $line = <$fh>) {
                        if ($line =~ m/$pattern/) {
                                print $line;
                        }   
                }   
        }   
}

grep_all @ARGV;