mvdkwast

#!/usr/bin/env perl
use v5.28;
use Data::Dumper;
use Tie::IxHash;

my @jdk_paths = qw{~/.jdks /usr/lib/jvm};

my @jdks;
push @jdks, glob "$_/*-*" for @jdk_paths;