open (my $dump, '-|', 'mysqldump ...') || die "Ohoh $!"
while (my $line = <$dump>) {
    print $line;
}