While debugging a failed test for AnyEvent on Windows, I created the following script based on test 80_ssltest.t:
use feature qw(say); use strict; use warning