#!/usr/bin/perl
# Copyright 1999-2015. Parallels IP Holdings GmbH. All Rights Reserved.
#
# Determine and print

use lib '.';
use Dumper;

my $mysql_credentials = Dumper::getMySQLDBCredentials();

print $mysql_credentials->{'user'} . "\n" . $mysql_credentials->{'password'}