in reply to how to split a 3 digit string?

@digits = ($SPSS_figures =~ /\d/g )

Ciao!
--bronto

# Another Perl edition of a song:
# The End, by The Beatles
END {
  $you->take($love) eq $you->make($love) ;
}