perl scalar to array conversion