##Haskell 

Trivial Haskell solution. Haven't really tried golfing it.

    l=length
    main=interact$\s->show[l s,l s,l$lines s,maximum$map l$lines s,l$words s]