PDL::FFT::Perl#realfft()#One-dimensional FFT of real function [inplace].The real part of the transform ends up in the first half of the array and the imaginary part of the transform ends up in the second half of the array.realfft($real);