Foreach is fine, but

use strict;
use warnings;



@site_array = {"tmp1","tmp2","tmp3"};
foreach $site (@site_array)
{
  print $site;
}
__END__
Global symbol "@site_array" requires explicit package name at - line 6
+.
Global symbol "$site" requires explicit package name at - line 7.
Global symbol "@site_array" requires explicit package name at - line 7
+.
Global symbol "$site" requires explicit package name at - line 9.
Execution of - aborted due to compilation errors.
[download]

Omitting strict temporarily, reveals

use warnings;

@site_array = {"tmp1","tmp2","tmp3"};
foreach $site (@site_array)
{
  print $site;
}
__END__
Odd number of elements in anonymous hash at - line 3.
HASH(0x225f14)
[download]

see perldata