¿Cómo puedo implementar Unix grep en Perl?

¿Cómo puedo implementargrep de Unix en Perl? Traté de usar el Perl incorporadogrep. Aquí está el código que no funciona:

$pattern = @ARGV[0];
$file= @ARGV[1];

open($fp,$file);

@arr = <$fp>;

@lines = grep $pattern, @arr;

close($fp);
print @lines;

Y por cierto, estoy intentando solo lo básicogrep funcionalidad no con todas las funciones y, en segundo lugar, no quiero hacer el análisis de cadenas yo mismo. Quiero usar incorporadogrep o alguna función de Perl.

Gracias por adelantado :)

Respuestas a la pregunta(5)

Su respuesta a la pregunta