[Catalyst] Catalyst + PAR + Module::Install::Catalyst

[Denis]

Hi Carl,

yes I try code( just commented this lines:
>$opt{l} = [qw/
>  c:\\usr\\perl\\site\\lib\\auto\\Wx\\wxbase26u_gcc_custom.dll
>  c:\\usr\\perl\\site\\lib\\auto\\Wx\\wxmsw26u_adv_gcc_custom.dll
>  c:\\usr\\perl\\site\\lib\\auto\\Wx\\wxmsw26u_core_gcc_custom.dll
>/];
because i haven't this dll's, I have installed MinGW 5.0 ), i got exe, but when I run it, nothing happen.(on process manager my exe is running)
any ideas?

p.s. about CF> quotes - it's feature of my email client ;-)



>> How to add add Version no. to exe ?

CF> I'm confused, did you intentionally remove the CF> quotes from parts
CF> of my code which add the version number, or was that just a glitch
CF> with your email quoter?

CF> Otherwise, did you try the code?

CF> Carl

>> CF> # add Version no. to exe
>>
>> CF> use Win32::Exe;
>> CF> my $exe     = Win32::Exe->new( $opt{o} );
>> my $rsrc    = $exe->>resource_section;
>> CF> my $version = $rsrc->first_object('Version');
>> CF> my $try;
>>
>> CF> eval {
>> CF>   push @INC, @{ $opt{I} };
>> CF>   require CAMS::SetPerms::topFrame;
>> CF>   if ($CAMS::SetPerms::topFrame::VERSION =~ /^(\d+)\.(\d)?(\d)?(\d)?$/) {
>> CF>     my @points = ($1, $2, $3, $4);
>> CF>     $_ ||= 0 for @points;
>> CF>     $try = join( ',', @points );
>> CF>   }
>> CF> };
>>
>> CF> $try ||= '1,0,0,0';
>>
>> $version->>set( FileVersion => $try );
>> $version->>set( CompanyName => 'x' );
>>
>> $version->>refresh;
>> $exe->>write_file( $opt{o}, $exe->dump );
>>
>> CF> print "built .exe version $try\n";



-- 
Best regards,
 Denis                            mailto:denis at uzvik.kiev.ua