foreach ('test_NO PASSWORD', 'test_PASSWORD', 'test_test', 'test', 'test_abc???????def') {
    print "$_: ", getPasswordStatus(split /_/), "\n";
}