my ($df, $dmysql);

while (<>)
{
    $df = $1 if /df_suu=(\d+)/;
    $dmysql = $1 if /d_mysql_suu=(\d+)/;
}

print "Last df_suu=$df\n";
print "Last d_mysql_suu=$dmysql\n";