use strict;
use utf8;
use Encode 'encode';

my $commandline = qq{start "" "$DocumentPath.pdf"};
system( encode 'CP1251', $commandline ) == 0
or die encode 'CP866', qq{Couldn't launch '$commandline': $!/$?};