my $SSC_MOVE = Win32::API->new( 'ssc-5', 'SSC_MOVE', 'II', 'I', ); sub SSC_MOVE { $SSC_MOVE->Call(@_); };