0 Пользователей и 1 Гость просматривают эту тему.
@testarray=(\'test\', \'test2\', \'test\');foreach (@testarray) { unless (exists $h{$_}) { $h{$_}=1; push @resarray, $_; };}; print join \', \', @resarray;