my $pattern = qr/
                  (?:      # Match beginning of line or whitespace sep
+arator, no capture
                   \A
                   |
                   \s+
                  )
                  (          # Capture one of:
                    "[^"]*"  # Matched double quotes
                  | '[^']*'  # Matched single quotes
                  | {[^}]*}  # Matched curly brackets
                  | \S+?      # non whitespace
                  )
                  (?=     # Match end of line or whitespace separator,
+ positive lookahead,no capture.
                  \z
                  |
                  \s+
                  )
              /x;

my $data = '#VER "" 3 19950101 "Overforing BG till PG" 19950608';
my @values = $data =~ /$pattern/g;

for my $i (0..$#values) {
    printf "%2d) %s\n",$i,$values[$i];
}
[download]

 0) #VER
 1) ""
 2) 3
 3) 19950101
 4) "Overforing BG till PG"
 5) 19950608
[download]

This may not help at all (as you haven't actually told us what you're trying to do or what problems you are having) but have you looked at Text::ParseWords.

Alternatively, if you have a specification for what all your potential input data looks like, then perhaps you can build a parser for it using Parse::RecDescent.

Here's an idea: don't. There's clever, and then there's trying to be too clever.

Given that it looks like you've got several different record types which start with a different first field, the more maintainable approach might be to split or regex off the type field (my( $type, $rest ) = split( /\s+/, $record, 2 );) then use a dispatch table to figure out what to do with $rest.

But judging from the info you give us I would tend towards a capturing regex and not use split. Something like

my ($type,$id,$no,$date1,$text,$date2)=/()()()()()()/;
[download]

first i think the examples in your question written in PHP , Right or Wrong ???? :Pp

and if you could put data sample you want to split alone (with out the code) , it would be better .

explain more what you want to do and you might get more help