Select Code to Download

for my $sql qw(sakila-schema.sql sakila-data.sql) {
    my $file     = "sakila-db/$sql";
...

    print $fh $contents;
}

List form of pipe open not implemented at (eval 19) line 109
        main::__ANON__('GLOB(0x2f641ec)', '|-', 'mysql',
    '--user=root', '--password=passw0rd', '--host=localhost',
    '--port=3306') called at etc/install_sakila.pl line 56

DELIMITER $$

...
END $$

DELIMITER ;