view release on metacpan or  search on metacpan

bin/create-modulino  view on Meta::CPAN

  my $modulino_name = create_modulino_name( shift @ARGV );

  if ( -e "$path/$modulino_name" ) {
    unlink "$path/$modulino_name";
  }

  print {*STDERR} Dumper( [ path => $path, modulino => "$path/$modulino_name" ] );

  copy( $path, "$executable_path/$modulino_name" );

  chmod oct('0755'), "$executable_path/$modulino_name";

  my $link_name = shift @ARGV;

  if ($link_name) {
    symlink "$executable_path/$modulino_name", "$executable_path/$link_name";
  }

  return 0;
}

bin/create-modulino.pl  view on Meta::CPAN

  my $modulino_name = create_modulino_name( $options{module} );
  my $modulino_path = sprintf '%s%s/%s', $destdir, $bindir, $modulino_name;

  if ( -e "$modulino_path" ) {
    unlink "$modulino_path";
  }

  copy( $path, "$modulino_path" );

  chmod oct('0755'), "$modulino_path";

  if ($alias) {
    symlink "$modulino_path", "$destdir$bindir/$alias";
  }

  return 0;
}

exit main();

lib/CLI/Simple.pm  view on Meta::CPAN

=item 1. Copy the C<modulino> script using a name that converts the
first letter of the class to lower case and any CamelCased words
inside the class name to lower case with all words snake cased.
Example: C<Module::ScanDeps::FindRequires> becomes:
C<module_scanDeps_findRequires>.

 sudo cp /usr/local/bin/modulino /usr/local/bin/module_scanDeps_findRequire
 
=item 2. Make sure the new script is executable.

 chmod 0755 module_scanDeps_findRequire

=item 3. Create a symlink with a name of your chosing to the new script.

 sudo ln -s /usr/local/bin/module_scanDeps_findRequire /usr/local/bin/find-requires 

=back

=back

=head1 LICENSE AND COPYRIGHT