n, m = gets.chomp.split.map(&:to_i)
ab = Array.new(n) { gets.chomp.split.map(&:to_i) }.sort_by! {|a, _| a }
res = 0
ab.each do |a, b|
  num = [b, m].min
  res += a * num
  m -= num
  break if m <= 0
end
puts res