Foro - Perl en Español

Hola...

Desearía me ayudaran con el siguiente script:
Actualmente estoy tratando de generar un script el cual lea línea por línea un archivo .txt y que extraiga todas las filas o cadenas que coincidan al inicio de estas con los siguientes caracteres: -SPtext=

Cada cadena encontrada deberá ser guardada en un nuevo archivo .txt el cual deberá ser generado por el script.

A continuación ejemplos de cadenas que se encuentran en el archivo .txt



Espero me puedas ayudar con algún script de ejemplo.