gistfile1.rb

class << self
  alias mess_with_bernerd define_method
end

mess_with_bernerd(:foo) do
  #
  #
  #
end

def find_method(file, line)
  methods.
    map     { |m| method(m) }.
    reject  { |m| !m.source_location }.
    select  { |m| m.source_location[0] == file }.
    select  { |m| m.source_location[1] <= line }.
    sort_by { |m| m.source_location[1] }.
    last.
    name
end

if $0 == __FILE__
  puts "Don't mess with Bernerd"
  puts find_method(__FILE__, 7)
end