Re: Tell if arch is HP or HPIA64

[choroba]

in reply to Tell if arch is HP or HPIA64

I needed a similar thing once, could not think of anything better than this:

sub arch {
    my $arch = `$^X -v`;
    $arch =~ s/.* built for //s;
    $arch =~ s/\n.*//s;
    return $arch;
}

[Anonymous Monk]

$ perl -v |ack "built for"
This is perl 5, version 14, subversion 1 (v5.14.1) built for MSWin32-x
+86-multi-thread

$ perl -V:archname
archname='MSWin32-x86-multi-thread';

$ perl -MConfig -le " print $Config{archname} "
MSWin32-x86-multi-thread

[choroba]

Thanks for the enlightenment! I knew it should be possible, but was not able to find it faster than typing the code.

[tmurnane]

Thanks all

Since I'm doing this from within a script and only have the issue on HP, I have the following:

my $os = $^O;
my $OS = "Win32";

SWITCH: {
   $os =~ /^s/i && do { $OS = "SunOS"; last SWITCH; };
   $os =~ /^l/i && do { $OS = "Linux"; last SWITCH; };
   $os =~ /^a/i && do { $OS = "AIX";   last SWITCH; };      
   $os =~ /^h/i && do { $OS = $Config{'archname'} =~ /64/ ? "HPIA64" :
+ "HP";   last SWITCH; };      
   }

Thanks

[Tux]

Using Config::Perl::V you can get the %Config settings that affect the build as well as the flags used to build the perl binary:

$ perl -MConfig::Perl::V=myconfig -MData::Dumper -e'print Dumper (myco
+nfig)'
--- lots of output here