Perl/Tk 시스템 기능 오류?

Question

나는 "올인원 계산기"를 만들고있다. (아마도).

use 5.12.4; 
use warnings; 
use Tk; 

##### Create MainWindow ##### 
my $button_menu = new MainWindow; 
############################# 

##### MainWindow Buttons##### 
my $calculator_button = $button_menu->Button(-text=>"Calculator", 
             -width=>10, 
             -relief=> 'raised', 
             -command=>\&open_calculator)->pack(); 

my $formulas_button = $button_menu->Button(-text=>"Formulas", 
            -width=>10, 
            -relief=> 'raised', 
            -command=>\&open_formulas)->pack(); 


sub open_calculator{ 
    system(qq{start "C:\\Windows\\system32\\calc.exe"}); 
} 

MainLoop; 

왜 시스템 기능은 윈도우 계산기를 열 수 없습니다 : 여기 내 코드는 (당신이 볼 수 있듯이 나는 여전히 일하고 있어요, 나는 모든 서브 루틴 정의하지 않아도 알)인가?

감사합니다.

Answer 1

이 시도 :없이

system(qq{start calc}); 

Answer 2

system('start C:\Windows\system32\calc.exe');