my $line = 'DATA/-/data123/data456//data789/-/AZ'; my @fields = split '/', $line;