GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages
Mojo::Loader(3) User Contributed Perl Documentation Mojo::Loader(3)
 

Mojo::Loader - Load all kinds of things

  use Mojo::Loader qw(data_section find_modules load_class);
  # Find modules in a namespace
  for my $module (find_modules 'Some::Namespace') {
    # Load them safely
    my $e = load_class $module;
    warn qq{Loading "$module" failed: $e} and next if ref $e;
    # And extract files from the DATA section
    say data_section($module, 'some_file.txt');
  }

Mojo::Loader is a class loader and plugin framework. Aside from finding modules and loading classes, it allows multiple files to be stored in the "DATA" section of a class, which can then be accessed individually.
  package Foo;
  1;
  __DATA__
  @@ test.txt
  This is the first file.
  @@ test2.html (base64)
  VGhpcyBpcyB0aGUgc2Vjb25kIGZpbGUu
  @@ test
  This is the
  third file.
Each file has a header starting with "@@", followed by the file name and optional instructions for decoding its content. Currently only the Base64 encoding is supported, which can be quite convenient for the storage of binary data.

Mojo::Loader implements the following functions, which can be imported individually.

  my $all   = data_section 'Foo::Bar';
  my $index = data_section 'Foo::Bar', 'index.html';
Extract embedded file from the "DATA" section of a class, all files will be cached once they have been accessed for the first time.
  # List embedded files
  say for keys %{data_section 'Foo::Bar'};

  my $bool = file_is_binary 'Foo::Bar', 'test.png';
Check if embedded file from the "DATA" section of a class was Base64 encoded.

  my @pkgs = find_packages 'MyApp::Namespace';
Search for packages in a namespace non-recursively.

  my @modules = find_modules 'MyApp::Namespace';
Search for modules in a namespace non-recursively.

  my $e = load_class 'Foo::Bar';
Load a class and catch exceptions, returns a false value if loading was successful, a true value if the class was not found, or a Mojo::Exception object if loading failed. Note that classes are checked for a "new" method to see if they are already loaded, so trying to load the same class multiple times may yield different results.
  # Handle exceptions
  if (my $e = load_class 'Foo::Bar') {
    die ref $e ? "Exception: $e" : 'Not found!';
  }

Mojolicious, Mojolicious::Guides, <https://mojolicious.org>.
2018-11-22 perl v5.28.1

Search for    or go to Top of page |  Section 3 |  Main Index

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with ManDoc.