use Config; my $archname = $Config{'archname'}; print "<$archname>\n";