プログラミング学習の記録 666.3 11章(読み書き、セーブとロードといったこと)の練習問題11.8、独自のプレイリストの作成 『初めてのプログラミング 第2版』(Chris Pine 著、長尾 高弘 訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)

開発環境

• Mac OS X Snow Leopard (OS)
• TextWrangler(Text Editor) (いずれはBBEditを入手したい！)
• Script言語:Ruby

『初めてのプログラミング 第2版』(Chris Pine　著、長尾 高弘　訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)の 11章(読み書き、セーブとロードといったこと),　11.8(練習問題)、独自のプレイリストの作成を解いてみる。

 

独自のプレイリストの作成(シャッフル無し)

コード(TextWrangler)

oggs = File.join('**','*.ogg') File.open 'playlist.m3u', 'w' do |f| oggs.each do |ogg| f.write ogg + "\n" end end puts '終わりましたよ!'

独自のプレイリストの作成(シャッフル)

コード(TextWrangler)

def shuffle array shuffled_array = [] while array.length > 0 rand_index = rand(array.length) tmp_array = [] index = 0 array.each do |item| if index == rand_index shuffled_array.push item else tmp_array.push item end index = index + 1 end array = tmp_array end shuffled_array end oggs = File.join('**','*.ogg') oggs = shuffle(Dir[oggs]) File.open 'playlist.m3u', 'w' do |f| oggs.each do |ogg| f.write ogg + "\n" end end puts '終わりましたよ!'

これで大体あってるのかな〜