29 lines
725 B
Ruby
29 lines
725 B
Ruby
|
class PerlRequirement < Requirement
|
||
|
|
fatal true
|
||
|
|
default_formula "perl"
|
||
|
|
|
||
|
|
def initialize(tags)
|
||
|
|
@version = tags.shift if /^\d+\.\d+$/ === tags.first
|
||
|
|
raise "PerlRequirement requires a version!" unless @version
|
||
|
|
super
|
||
|
|
end
|
||
|
|
|
||
|
|
satisfy(:build_env => false) do
|
||
|
|
which_all("perl").detect do |perl|
|
||
|
|
perl_version = Utils.popen_read(perl, "--version")[/\(v(\d+\.\d+)(?:\.\d+)?\)/, 1]
|
||
|
|
next unless perl_version
|
||
|
|
Version.new(perl_version.to_s) >= Version.new(@version)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
def message
|
||
|
|
s = "Perl #{@version} is required to install this formula."
|
||
|
|
s += super
|
||
|
|
s
|
||
|
|
end
|
||
|
|
|
||
|
|
def inspect
|
||
|
|
"#<#{self.class.name}: #{name.inspect} #{tags.inspect} version=#{@version.inspect}>"
|
||
|
|
end
|
||
|
|
end
|