[meta] Add some more scripts
- A script for killing my iMac's broken HDD fan
- A script for scraping Culture ship names from Wikipedia
diff --git a/scripts/kill_imac_hdd_fan.rb b/scripts/kill_imac_hdd_fan.rb
new file mode 100755
index 00000000..0604a3b5
--- /dev/null
+++ b/scripts/kill_imac_hdd_fan.rb
@@ -0,0 +1,7 @@
+#!/usr/bin/env ruby
+
+fan_speed = (ARGV.shift || 1100).to_i
+
+smc = '~/Applications/smcFanControl.app/Contents/Resources/smc'
+fan_speed = (fan_speed << 2).to_s(16)
+`#{smc} -k F1Mx -w #{fan_speed}`
\ No newline at end of file
diff --git a/scripts/scrape_culture_ship_names.rb b/scripts/scrape_culture_ship_names.rb
new file mode 100644
index 00000000..50eb8594
--- /dev/null
+++ b/scripts/scrape_culture_ship_names.rb
@@ -0,0 +1,9 @@
+require "open-uri"
+require "rexml/document"
+
+html = open('https://en.wikipedia.org/wiki/List_of_spacecraft_in_the_Culture_series').read
+doc = REXML::Document.new(html)
+tds = doc.elements.to_a('//table[tr/th/text()="Name"]/tr//td[3]')
+names = tds.map {|td| REXML::XPath.match(td, './/text()')[0] }
+
+puts names