my $cmd = "pugs $scr $intmp";