Here's < 15 lines, clear, but not functional programming :)

  #!/usr/local/bin/perl
  #borrowed from Nick Holloway <alfie@dcs.warwick.ac.uk>, 27th May 1993.
  my $size=8;my @cols=(0..$size-1);
  sub nextq {
      (print( "@_\n" ),return) if @_ == $size;
      foreach my $col(@cols) {
          next if grep($_ == $col, @_);
          my $row=@_;next if grep ($_ == $col-$row--, @_);
          my $row=@_;next if grep ($_ == $col+$row--, @_);
          nextq(@_,$col);
      }
  }   
  nextq();

Not sure if it's slower or more resource intensive than the Scala solution. I'm sure it could be golfed down to be smaller than the Scala counterpart. It has fewer characters already, even with the comments intact.