#!/usr/bin/perl

use strict;
use warnings;
use

my $input = '/path/to/file.txt'; # die Ausgangsdatei
my $output = '/path/to/ergebnis.sql'; # das Ergebnis

# öffne die Ausgangsdatei, verwende ein lexikalisches Filehandle
# und fange eventuelle Fehler ab.
# verwende die 3-Arg-Form von open
open my $fh, '<', $input or die $!;

while( my $line = <$fh> ){
    chomp $line; # entferne das Newline
    my ($email, $name) = split / /, $line,2; # teile die Zeile am Leerzeichen - genau einmal teilen
    # hier dann sql-Statement ausgeben
}

close $fh;