| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172 |
- module Docs
- class Perl < UrlScraper
- self.name = 'Perl'
- self.type = 'perl'
- self.initial_paths = ['modules.html', 'perlutil.html', 'perl.html']
- self.links = {
- home: 'https://www.perl.org/'
- }
- html_filters.push 'perl/pre_clean_html', 'perl/entries', 'perl/clean_html', 'title'
- options[:container] = '#perldocdiv'
- options[:skip] = %w(
- perlbook perlcommunity perlexperiment perlartistic perlgpl perlhist
- perlcn perljp perlko perltw
- perlboot perlbot perlrepository perltodo perltooc perltoot )
- options[:skip_patterns] = [/\Afunctions/, /\Avariables/, /\.pdf/, /delta/]
- options[:attribution] = <<-HTML
- © 1993–2021 Larry Wall and others<br>
- Licensed under the GNU General Public License version 1 or later, or the Artistic License.<br>
- The Perl logo is a trademark of the Perl Foundation.
- HTML
- version '5.34' do
- self.release = '5.34.0'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- version '5.32' do
- self.release = '5.32.0'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- version '5.30' do
- self.release = '5.30.3'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- version '5.28' do
- self.release = '5.28.3'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- version '5.26' do
- self.release = '5.26.3'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- version '5.24' do
- self.release = '5.24.4'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- version '5.22' do
- self.release = '5.22.4'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- version '5.20' do
- self.release = '5.20.3'
- self.base_url = "https://perldoc.perl.org/#{self.release}/"
- end
- def get_latest_version(opts)
- doc = fetch_doc('https://perldoc.perl.org/', opts)
- doc.at_css('#dropdownlink-stable').content
- end
- end
- end
|