view release on metacpan or  search on metacpan

lib/App/Seacan.pm  view on Meta::CPAN

    my $launcher = join_path($target_directory, $app_name);
    make_path($target_directory);
    open(my $fh, ">:utf8", $launcher) or die $!;
    print $fh "#!/bin/bash\n";
    print $fh "PERL5LIB=$output/local/lib/perl5:$app_lib\n";
    print $fh "export PERL5LIB\n";
    # String "app" shouldn't be hardcoded and be part of the config
    # app.pl will not be the likely name of the main script.
    print $fh "$output/perlbrew/perls/seacan/bin/perl $output/app/$app_name/bin/$app_name \$@\n";
    close $fh or die($!);
    chmod(0755, $launcher) or die($!);
}

sub run {
    my $self = shift;
    $self->install_perl unless $self->perl_is_installed;
    $self->install_cpan;
    $self->copy_app;
    $self->create_launcher;
}