The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

use strict;
use warnings;

use Test::More
    tests => 1
;

use CSS::Orientation;

my $input = 'cursor: ne-resize';
my $output = 'cursor: nw-resize';
my $result = CSS::Orientation::FixCursorProperties( $input );

is( $output, $result );