, 'morph without arguments prints json' ); $result = qx(bin/morph /foo/bar); like( $result, qr/^(5|"5")\n$/, 'morph without arguments prints json' ); $result = qx(bin/morph --format=