Using Clojure for Scripting

Using Clojure for Scripting 67

Posted by Uncle Bob Sat, 08 Aug 2009 19:14:07 GMT

Clojure makes a nice language for writing scripts that explore things on the filesystem. For example, here is a cute little program that explores the FitNesse source tree counting the lines of production java code and comparing it to the lines of unit test code.


(use 'clojure.contrib.duck-streams)

(def file-counts
  (map
    #(list (.toString %) (count (read-lines %)))
    (remove #(.isDirectory %)
      (file-seq (file-str "~/projects/FitNesseGit/src/fitnesse")))))

(defn count-lines-that-end-with [file-counts suffix]
  (reduce +
    (map second
      (filter #(.endsWith (first %) suffix) file-counts))))

(def java-count (count-lines-that-end-with file-counts ".java"))
(def test-count (count-lines-that-end-with file-counts "Test.java"))

(printf "Java lines: %d\n" java-count)
(printf "Test lines: %d\n" test-count)
(printf "Test pct: %.1f\n" (double (* 100 (/ test-count java-count))))

Posted in Uncle Bob's Blatherings
Meta 67 comments, permalink, rss, atom

Comments

Leave a response

Luis Sergio Oliveira 5 days later:

I started a while ago exploring this in Common Lisp (with Franz’s Allegro CL implementation). My objective is to automate administrative and information extraction tasks. So far it is powerful enough, having interfaces with the shell, Operating System as with M$ Office (COM), being the main problem the lack of high level structure of the data, mainly if it is document oriented.
han 8 months later:

http://www.ipadvideoconverters.biz iPad Video Converter iPad Video Converter is a great software for iPad lovers to convert videos to iPad with super fast speed and high quality. Its easy-to-use interface makes iPad to videos conversion routine very simple. And also it can keep the original quality of video files.
taylor lautner 11 months later:

interesting “cute” little program. I’m a beginner scripter, using a couple languages, Java, Python, Mel Script, and Apple Script, but I haven’t tried out Clojure.
supplynflshop about 1 year later:

good
Hosting about 1 year later:

Wide range of web hosting services are accessible, such as cheap vps , email hosting, Unix hosting, forex vps , Windows hosting, Linux web hosting windows vps etc. We hope you will find a cheap hosting company.
Designer Bags about 1 year later:

Awesome article!Thanks for ur nice sharing!!!!
Dog bark collar about 1 year later:

Clojure is really a good language in order to write scripts exploring things on the filesystem. Thanks for your example.
Pandora about 1 year later:

What does this picture suggest to you or what can you draw from it, if anything?
Cazare in Bucuresti about 1 year later:

Thanks for sharing. Clojure is really a good language for scripts.
Harrishcolin about 1 year later:

Thank you for this nice post

my blogs : calories in food | how to put on a condom
Coach Factory Outlet about 1 year later:

yes, but not very much. So I’m not going to be spending much
???? ???? about 1 year later:

Thanks for uniqueness, much appreciate this!
para kazanma yollar? - i? imkan? about 1 year later:

Good post,I think so! Dear Admin, I thank you for this informative article.

Risk almadan Sermayesiz Evinizden yönetebilece?iniz Kendi i?inizin sahibi olmak istermisiniz ?
custom writing services about 1 year later:

Merci pour votre information, j’espere que les prochaines articles seront tellement informatiques que celui-ci!
Silicone Molding about 1 year later:

Mold making is the core business of Intertech (Taiwan). With world level technology, Intertech enjoys a very good reputation for making Injection Mold and Plastic Moldsfor their worldwide customers.
gearbox about 1 year later:

We are engaged in gearbox,radial piston motor,axial piston motor,piston motor,slewing transmission,danfoss motor,hydraulic orbital motor,hydraulic steering,hydraulic steering unit,hydraulic winch. All products are strictly tested before delivery by testing bench and comprehensive testing facilities to ensure the quality.
Criminal Check about 1 year later:

Clojure is really a good language for scripts. Great stuff, worth reading. Thanks for this awesome information.
Solid State Relay about 1 year later:

Classic exposition, I have also mentioned it in my blog article. But it is a pity that almost no friend discussed it with me. I am very happy to see your article.
Casinoenligne-logiciel about 1 year later:

I agree with the last comment this is quite a helpful post for once ;)

Liked the article as well ! ;) Keep it up.
cheap thomas sabo jewellery about 1 year later:

Forever advice taken to heart. I truly take account the time you’ve taken to share your thoughts. It is a outstanding assistance, thanks so much!
Criminal Records about 1 year later:

So far it is powerful enough, having interfaces with the shell, Operating System as with M$ Office (COM), being the main problem the lack of high level structure of the data, mainly if it is document oriented.
brazilian fightwear about 1 year later:

This is such a excellent article to read. Continue the nice work. Expecting to see a lot more excellent articles from you shortly.
Pittsburgh events about 1 year later:

Forever advice taken to heart. I truly take account the time you’ve taken to share your thoughts. It is a outstanding assistance, thanks so much!

cheap true religion los angeles about 1 year later:

hni

Method of washing and maintenance of True Religion Jeans for cheapjeans 1,

viagra sans ordonnance about 1 year later:

The excellent tutorial and it is definitely going to help me some time. Really good ideas.
best wart remover about 1 year later:

Thanks for informative and helpful post, obviously in your blog everything is good.If you post informative comments on blogs there is always the chance that actual humans will click through.
Disount Christian Louboutin about 1 year later:

This is a superb posting, I identified your weblog web page executing study google for any related topic and came to this.I never thought I would agree with this opinion, but I’m starting to view things from a different view. I have to research more on this as it seems very interesting. One thing I don’t understand though is how everything is related together. I couldnt uncover to substantially supplemental info and details on this write-up, so it was pleasant to find this 1. I’ll in all probability finish up currently being again once more to appear at another content articles that you’ve got yet another time. yhm20110408 Disount Christian Louboutin
Nike SB Shoes about 1 year later:

Hi webmaster, commenters and everybody else !!! The blog was absolutely fantastic! Lots of great information and inspiration, both of which we all need!b Keep ‘em coming… you all do such a great job at such Concepts… yhm20110408 http://www.fashiontrendmall.com/nike-sb.html">Nike SB Shoes
cheap tiffany co jewelry about 1 year later:

He who makes no mistakes makes nothing. If a man deceives me once, shame on him, if he deceives me twice,shame on me.

If you make yourself an ass, don’t complain if people rideyou. Courtesy on one side only lasts not long. Knowledge

makes humble, ignorance makes proud. Life is half spent before we know what it is. Each bird love to hear himself

sing. cheap tiffany co jewelry
krzyzowki about 1 year later:

Great read You might want to follow up to this topic
darmowe pozycjonowanie about 1 year later:

Great blog post, I have been waiting for that
portraits from photos about 1 year later:

Hi Uncle Bob!

Using Clojure for Scripting is really a great share. I have been searching for this for a while and found it here. Great Job, keep it up!

Best, Tina Smith
coach bags about 1 year later:

good post,i like this
linux about 1 year later:

I think this is one of the most important information for me. And i’m glad reading your article. But wanna remark on few general things, The website style is great, the articles is really excellent. Good job, cheers
32gb micro sd card about 1 year later:

Thanks great piece of code exactly what i needed.
okey oyunu oyna about 1 year later:

nice code.

internette görüntülü olarak okey oyunu oyna, gerçek kisilerle tanis, turnuva heyecanini yasa.
replica designer handbags sale about 1 year later:

Many girls like roses
shoes christian louboutin about 1 year later:

O_O oh mama, looks great :) thank u so much for all your hard work ^.~
Movies 2011 about 1 year later:

And i’m glad reading your article. But wanna remark on few general things, The website style is great, the articles is really excellent. Good job, cheers
Ed Hardy Outlet about 1 year later:

Men at some point understands that they will be the master-gardener involving the heart, your representative involving the lifestyle. Men whom dares for you to squander an hour of your energy haven’t found out the significance involving lifestyle. Most lifestyle is surely an research. Greater findings anyone create better. The many art work involving existing is based on a fine interacting involving enabling get along with holding on. Just about any idiot could deal with an emergency – it can be day by day existing that will has on anyone out and about. Feel that lifestyle may be valued at existing plus your notion might help develop simple fact.
christian louboutin shoes on sale about 1 year later:

Have the christian louboutin patent leather pumps is a happy thing.
www.sunfad.com about 1 year later:

www.sunfad.com
pandora bracelet charms over 2 years later:

These articles written too great,they rich contents ma le scarpe non ti donano. meglio dei sandali con stringe più sottili e caviglia libera Perfect! and data accurately.they are help to me.I expect to see your new share.
beats by dre store over 2 years later:

stringe più sottili e caviglia libera Perfect! and data accurately.they are help to me.I expect to see your new share.high quality headphones new design headphones
bagsupplyer over 2 years later:

It is nice of you to post this.I will pay more attention on it.New fashion women Hermes purses AAA with high quality for wholesale on line from China free shipping
<a href="http://www.wingsshoess.com/"><strong>Adidas Wing Shoes</strong></a> over 2 years later:

good
replica Oakley Frogskins Sunglasses over 2 years later:

It’s wonderful, thank you. replica oakley monster dog sunglassescheap Oakley Necessity SunglassesOakley Necessity Sunglasses wholesalereplica Oakley Necessity Sunglassesoakley oil rig sunglasses wholesalecheap Oakley Pit Boss SunglassesOakley Pit Boss Sunglasses wholesaleReplica Oakley HolbrookReplica Oakley JawboneReplica Oakley JulietReplica Oakley Scalpel SunglassesReplica Oakley Straight Jacket SunglassesReplica Oakley Ten SunglassesReplica Oakley Zero SunglassesFake Oakley Monster Dog sunglassesFake Oakley Pit Boss sunglassesFake Oakley Restless sunglassesFake Oakley Scalpel sunglassesOakley Frogskins SunglassesOakley Fuel Cell SunglassesOakley Gascan SunglassesOakley Hijinx Sunglasses
replica Oakley Frogskins Sunglasses over 2 years later:

It’s wonderful, thank you. replica oakley monster dog sunglassescheap Oakley Necessity SunglassesOakley Necessity Sunglasses wholesalereplica Oakley Necessity Sunglassesoakley oil rig sunglasses wholesalecheap Oakley Pit Boss SunglassesOakley Pit Boss Sunglasses wholesaleReplica Oakley HolbrookReplica Oakley JawboneReplica Oakley JulietReplica Oakley Scalpel SunglassesReplica Oakley Straight Jacket SunglassesReplica Oakley Ten SunglassesReplica Oakley Zero SunglassesFake Oakley Monster Dog sunglassesFake Oakley Pit Boss sunglassesFake Oakley Restless sunglassesFake Oakley Scalpel sunglassesOakley Frogskins SunglassesOakley Fuel Cell SunglassesOakley Gascan SunglassesOakley Hijinx Sunglasses
Fake Oakley Radar over 2 years later:

It really a good article.Oakley Sport SunglassesOakley Jawbone SunglassesOakley Radar SunglassesOakley M Frame SunglassesFake Oakleys AAA Specials sunglassesFake Oakley Flak Jacket sunglassesFake Oakley Juliet sunglassesFake Oakley Half Jacket sunglassesReplica Oakleys Promotion SaleReplica Oakley Jawbone SunglassesReplica Oakley Oil Rig SunglassesReplica Oakley Polarized SunglassesFake Oakley BatwolfFake Oakley DangerousFake Oakley Dartcheap Oakley Antix SunglassesOakley Antix Sunglasses wholesalereplica Oakley Antix Sunglassescheap oakley batwolf sunglassesoakley batwolf sunglasses wholesalereplica oakley batwolf sunglasses
Fake Oakley Gascan sunglasses over 2 years later:

I love this article, it’s very well.Oakley Encounter SunglassesOakley Forsake SunglassesOakley Half Wire SunglassesOakley Half X Sunglasses
scrabble cheat over 2 years later:

It is the site what I always prefer to share with my friends. Awesome work has been done here to make the post effective.
ysbearing/yisong@1stbearing.com over 2 years later:

Slewing bearing called slewing ring bearings, is a comprehensive load to bear a large bearing, can bear large axial, radial load and overturning moment. http://www.1stbearing.com
Tips For Bowling over 2 years later:

Then, after I came home from Europe, I found I was under condemnation; and I was condemned at that time because I did not endorse the financial policy of the General Conference.
christian louboutin over 2 years later:
The professional design make you foot more comfortable. Even more tantalizing,this pattern make your legs look as long as you can,it will make you looked more attractive.Moveover,it has reasonable price.If you are a popular woman,do not miss it.

Technical details of Christian Louboutin Velours Scrunch Suede Boots Coffee:
```
Color: Coffee
Material: Suede
4(100mm) heel
Signature red sole x
```
Fashion, delicate, luxurious Christian louboutins shoes on sale, one of its series is Christian Louboutin Tall Boots, is urbanism collocation. This Christian louboutins shoes design makes people new and refreshing. Red soles shoes is personality, your charm will be wonderful performance.
north face promotion Code over 2 years later:

the article is impressive,thank you for your share, i like it so much
Discount Louboutin Shoes over 2 years later:

Every women always has Christian Louboutins Wedding Shoes turn of fame but it also has its own goodbyes.
mezuzah over 3 years later:

Beautiful!! as all what is made by hand.
Marc Jacobs outlet over 3 years later:

I am glad you have posted information on this topic.I hope you will keep this blog up to date with more information.
bladeless fans over 3 years later:

Using Clojure for Scripting 58 good post26
louboutin sales over 3 years later:

Using Clojure for Scripting 59 hoo,good article!!I like the post!164
longchamp over 3 years later:

sadsdasda
point of use water dispenser over 3 years later:

yeah, I am looking for a script for adding widgetized footer for my site. .
fake Ray Bans for sale over 3 years later:

Fake Ray Ban Jackie sun shades polarized lenses are of coursework, not an exception to the rule. Polarized were first popular with fishermen boaters 2011 New Goods were constantly surrounded by the glare being reflected from the sunlight on the water. Polarized lenses contain a special light filter that blocks this type of intense reflected light, reducing glare. This glare reduction allows for improved visibility & less eye strain. The Ray Ban RB4101 allowed improved visibility & reduced eye strain when being out on the water. Since then polarizd sun shades have become more popular with people engaging in active outdoor activities.
longchamp outlet online over 3 years later:

sasadsadsadsa
fdsfdsfds over 3 years later:

This is a great post! Thanks.mac cosmetics saleOakley Sideways SunglassesOakley Bottlecap SunglassMAC Sheertone Blush saleReplica Oakley Commit SQ SunglassesMAC BrushOakley Commit SQ SunglassMAC Studio Finish Concealer sale
clemence leather over 3 years later:

Handbags are no longer just items of practicality, but have become a symbol of style and self-identification and the demand for fashionable designer handbags shows no sign of slowing?
Plastic Injection Mold over 3 years later:

With more than 20 years of experience, Intertech provides an extensive integrated operational ability from design to production of molds 100% made in Taiwan. Additional to our own mold making factory, we also cooperate with our team vendors to form a very strong working force in Taiwan.

For the overseas market, we work very closely with local representatives in order to take care of the technical communication and after-sales service to our customers. We also participate in the EUROMOLD & FAKUMA exhibitions and meet our customers every year in Europe. By concentrating on mold “niche markets”, we play a very useful mold maker role from the Far East whenever customers want to develop their new projects. We provide services from A to Z to our customers on a very economic cost and effect basis.

Mentor	twitter id
Uncle Bob	unclebobmartin
Brett Schuchert	schuchert
Michael Feathers	mfeathers
Bob Koss	bob_koss

Using Clojure for Scripting 67

Comments

Blog Search

Follow us on twitter

Categories

Blogroll

Syndicate