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

$ 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
[download]

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; };      
   }
[download]

Thanks

Thanks for the enlightenment! I knew it should be possible, but was not able to find it faster than typing the code.
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

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
[download]


Enjoy, Have FUN! H.Merijn