foreach my $orig ( @data ) {
    my $root = sqrt $orig;
    ... do something with square root here ...
}