#!/usr/bin/perl
use strict;
use warnings;
use 5.010;

if (version->parse('1.2.4') <= version->parse('1.1')) {say "1wahr";}    # 1wahr --> falsch
if (version->parse('v1.2.4') <= version->parse('v1.1')) {say "2wahr";}  # '' --> richtig

require List::Util; say List::Util->VERSION; # 1.5
if (version->parse('1.19') <= version->parse('1.5')) {say "3wahr";}	    # 3wahr --> richtig
if (version->parse('1.19') <= version->parse('1.50')) {say "4wahr";}	# 4wahr --> richtig
if (version->parse('v1.19') <= version->parse('v1.5')) {say "5wahr";}	# '' --> falsch
if (version->parse('v1.19') <= version->parse('v1.50')) {say "6wahr";}	# 6wahr --> richtig