view release on metacpan or  search on metacpan

lib/Lingua/Identify/Blacklists.pm  view on Meta::CPAN

  assumed    => $assumed_lang
  langs      => \@list_of_possible_langs
  use_margin => $score

If C<langs> are specified, it runs the classifier with blacklists for those languages (in a cascaded way, i.e. best1 = lang1 vs lang2, best2 = best1 vs lang3, ...). If C<use_margin> is specified, it runs all versus all and returns the language that w...

If the C<assumed> language is given, it runs the blacklist classifier for all languages that can be confused with $assumed_lang (if blacklist models exist for them).

If neither C<langs> not C<assumed> are specified, it first runs a general-purpose language identification (using Lingua::Identify::CLD and Lingua::Identify) and then checks with the blacklist classifier whether the detected language can be confused w...

lib/Lingua/Identify/Blacklists.pm  view on Meta::CPAN

The following functions are not exported and are mainly used for internal purposes (but may be used from the outside if needed).

 initialize()                     # reset the repository of blacklists
 identify_language($text)         # return lang-ID for $text (using CLD)
 classify(\%dic,%options)         # run the classifier
 classify_cascaded(\%dic,@langs)  # run a cascade of binary classifications

 # run all versus all and return the one that wins most binary decisions
 # (a score margin is used to adjust the reliability of the decisions)

 classify_with_margin(\%dic,$margin,@langs) 

lib/Lingua/Identify/Blacklists.pm  view on Meta::CPAN

    @langs = available_languages() unless (@langs);

    return &classify_with_margin( $dic, $options{use_margin}, @langs ) 
	if ($options{use_margin});
    return &classify_cascaded( $dic, @langs );
}

sub classify_cascaded{
    my $dic = shift;
    my @langs = @_;

    my $lang1 = shift(@langs);
    foreach my $lang2 (@langs){

 view release on metacpan or  search on metacpan

src/cld2/public/compact_lang_det.h  view on Meta::CPAN

    uint16 pad;                 // Make multiple of 4 bytes
  } ResultChunk;
  typedef std::vector<ResultChunk> ResultChunkVector;


  // These initial simple versions all cascade through the full-blown last
  // version which it would be better for you to use directly because you will
  // get better results passing in any available hints.

  // Scan interchange-valid UTF-8 bytes and detect most likely language
  // If the input is in fact not valid UTF-8, this returns immediately with

 view release on metacpan or  search on metacpan

lib/Lingua/Lexicon/IDP/Data/en_es.txt  view on Meta::CPAN

carve	tallar
carved	tallado
casa	casa (house)
casa	house[Conjunction]
casaba	casaba ( vegetable )
cascade	cascada
cascades	cascadas
cash	efectivo
cashier	cajero
cashier	el cajero
cashiers	cajeros
casino	casino

 view release on metacpan or  search on metacpan

examples/collected_works_poe.txt  view on Meta::CPAN

prevent the escape of the deer. Nothing of the fence kind was
observable elsewhere; for nowhere else was an artificial enclosure
needed: -- any stray sheep, for example, which should attempt to make
its way out of the vale by means of the ravine, would find its
progress arrested, after a few yards' advance, by the precipitous
ledge of rock over which tumbled the cascade that had arrested my
attention as I first drew near the domain. In short, the only ingress
or egress was through a gate occupying a rocky pass in the road, a
few paces below the point at which I stopped to reconnoitre the
scene.

examples/collected_works_poe.txt  view on Meta::CPAN

time afterward we came to understand that such was the appearance of
the streams throughout the whole group. I am at a loss to give a
distinct idea of the nature of this liquid, and cannot do so without
many words. Although it flowed with rapidity in all declivities where
common water would do so, yet never, except when falling in a
cascade, had it the customary appearance of limpidity. It was,
nevertheless, in point of fact, as perfectly limpid as any limestone
water in existence, the difference being only in appearance. At first
sight, and especially in cases where little declivity was found, it
bore resemblance, as regards consistency, to a thick infusion of
gum arabic in common water. But this was only the least remarkable of

 view release on metacpan or  search on metacpan

t/integration.t  view on Meta::CPAN

# ---------------------------------------------------------------------------
# 12. Locale detection integration: full env-var precedence chain
#
# POD DESCRIPTION: detection uses LANGUAGE, LC_ALL, LC_MESSAGES, LANG
# in that priority order.  This test drives the full detection cascade.
# ---------------------------------------------------------------------------
subtest 'locale detection -- precedence chain' => sub {
	mock 'I18N::LangTags::Detect::detect' => sub { () };    # disable HTTP path

	# LANG lowest priority: used when others absent

 view release on metacpan or  search on metacpan

privates/xfsm_api.h  view on Meta::CPAN

     maps each input string to the outputs that meet the constraint
     if there are any, eliminating the outputs that violate the
     constraint. However, if none of the outputs of a given input
     meet the constraint, all of them remain. That is, lenient
     composition guarantees that every input has outputs. A set
     of ranked OT constraints can be implemented as a cascade of
     lenient compositions with the most higly ranked constraint on
     the top of the cascade. */

  NETptr close_sigma(NETptr net, ALPHABETptr new_symbols,
  		     int copy_p, int minimize_p);
  /* Error handling */

 view release on metacpan or  search on metacpan

data/cedict_ts.u8  view on Meta::CPAN

小毛蟲 小毛虫 [xiao3 mao2 chong2] /slug/
小米 小米 [xiao3 mi3] /millet/
小牛 小牛 [xiao3 niu2] /calf/
小朋友 小朋友 [xiao3 peng2 you3] /children/
小牝牛 小牝牛 [xiao3 pin4 niu2] /heifer/
小瀑布 小瀑布 [xiao3 pu4 bu4] /cascade/
小起重機 小起重机 [xiao3 qi3 zhong4 ji1] /jack/
小氣 小气 [xiao3 qi4] /stingy/narrow/petty/
小汽車 小汽车 [xiao3 qi4 che1] /compact car/
小青 小青 [xiao3 qing1] /name of a person, Xiaoqing, from Madam White Snake/
小丘 小丘 [xiao3 qiu1] /hill/knoll/

 view release on metacpan or  search on metacpan

lib/Linux/DVB/DVBT/Advert.pm  view on Meta::CPAN

	my @black_cut_list ;
	my @silent_cut_list ;
	my @logo_cut_list ;

	## Settings
	my $global_settings_href = Linux::DVB::DVBT::Advert::Config::cascade_settings($extra_settings_href, '', $results_settings_href) ;
	my $black_settings_href = Linux::DVB::DVBT::Advert::Config::cascade_settings($extra_settings_href, 'frame', $results_settings_href) ;
	my $logo_settings_href = Linux::DVB::DVBT::Advert::Config::cascade_settings($extra_settings_href, 'logo', $results_settings_href) ;
	my $silent_settings_href = Linux::DVB::DVBT::Advert::Config::cascade_settings($extra_settings_href, 'audio', $results_settings_href) ;

	# return cascaded settings
	$results_href->{'settings'} = {
		$global_settings_href,
		'frame' => $black_settings_href,
		'logo' => $logo_settings_href,
		'audio' => $silent_settings_href,

 view release on metacpan or  search on metacpan

lib/Litavis.pm  view on Meta::CPAN

    1. Flatten nested selectors
    2. Resolve preprocessor variables, mixins, and map variables
    3. Evaluate colour functions (lighten, darken, etc.)
    4. Merge rules with the same selector (later properties win)
    5. Deduplicate rules with identical properties (cascade-aware)
    6. Emit CSS string (minified or pretty-printed)

C<compile> is non-destructive; calling it multiple times returns the same
result. Use C<reset> to clear state between independent compilations.

lib/Litavis.pm  view on Meta::CPAN

=item B<dedupe> => 0 | 1 | 2

Deduplication strategy. C<0> disables deduplication entirely. C<1> (default)
uses conservative mode which only merges rules when no intervening rule
defines a conflicting property. C<2> uses aggressive mode which merges all
rules with identical properties regardless of cascade position.

=item B<indent> => $string

Indent string for pretty mode. Default is two spaces C<"  ">. Common
alternative is C<"\t">.

lib/Litavis.pm  view on Meta::CPAN

        .theme  { color: red; }
        .footer { color: black; margin: 0; }
    ')->compile;
    # .reset and .footer are NOT merged because .theme
    # defines "color" which conflicts - merging would
    # reorder the cascade.

    # Aggressive mode - merge all identical, ignore cascade
    my $css = Litavis->new(dedupe => 2)->parse('
        .a { padding: 8px; }
        .b { color: red; }
        .c { padding: 8px; }
    ')->compile;

lib/Litavis.pm  view on Meta::CPAN

    litavis.h             Master include (context struct, lifecycle)
    litavis_ast.h         Ordered AST with hash index
    litavis_tokeniser.h   Single-pass CSS tokeniser
    litavis_parser.h      Recursive descent parser with selector flattening
    litavis_cascade.h     Cascade-aware deduplication
    litavis_vars.h        Variable, mixin, and map resolution
    litavis_colour.h      Colour function evaluation (uses colouring.h)
    litavis_emitter.h     CSS output (minified and pretty-printed)

=head1 DEPENDENCIES

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

	- Fix dependency specification

0.03      2018-12-05 20:24:12+01:00 Europe/Berlin
	- Handle variable args to translation functions without
	  warnings ("__($foo)") - GH#3 - kgoess
	- Handle "cascade with" statements - GH#4 - kgoess
	- Handle 'nil' without warnings - GH#5 - kgoess

0.02      2017-01-16 22:31:32+01:00 Europe/Berlin
	- Allow registration of custom translation methods (kgoess)
	- Allow extraction of texts to be translated via filters (kgoess)

 view release on metacpan or  search on metacpan

examples/fretcalctk.pl  view on Meta::CPAN

                    -command => sub { exit },
                    -underline => 1);

# Calc menu items
# Mode Cascade
my $menu_mode_cascade = $menu_calc->menu->Menu();

$menu_mode_cascade->radiobutton(-label => 'Standard',
                           #-command => \&mode,
                           -variable => \$rb1,
                           -value => 'Standard');

$menu_mode_cascade->radiobutton(-label => 'Dulcimer',
                           #-command => \&mode,
                           -variable => \$rb1,
                           -value => 'Dulcimer');

$menu_calc->cascade(-label => 'Mode');

$menu_calc->entryconfigure('Mode', -menu => $menu_mode_cascade);

$menu_calc->separator();

# Precision Cascade
my $menu_prec_cascade = $menu_calc->menu->Menu();

$menu_prec_cascade->radiobutton(-label => '.1',
                           #-command => \&display_radiobutton2,
                           -variable => \$rb2,
                           -value => '.1');

$menu_prec_cascade->radiobutton(-label => '.01',
                           #-command => \&display_radiobutton2,
                           -variable => \$rb2,
                           -value => '.01');

$menu_prec_cascade->radiobutton(-label => '.001',
                           #-command => \&display_radiobutton2,
                           -variable => \$rb2,
                           -value => '.001');

$menu_prec_cascade->radiobutton(-label => '.0001',
                           #-command => \&display_radiobutton2,
                           -variable => \$rb2,
                           -value => '.0001');


$menu_calc->cascade(-label => 'Precision');

$menu_calc->entryconfigure('Precision', -menu => $menu_prec_cascade);


# Help menu items
$menu_help->command(-label => 'Help',
                    -command => [\&help, 'Help not implemented']);

 view release on metacpan or  search on metacpan

lib/MIDI/XML/Editor.pm  view on Meta::CPAN

#  my $menubar = $menu_f->Menu(-type => 'menubar');
#  $menu_f->configure(-menu => $menubar);

#  map {$menubar->cascade( -label => '~' . $_->[0], -menuitems => $_->[1] )}
#      ['File', _file_menuitems],
#      ['Edit', _edit_menuitems],
#      ['Help', _help_menuitems];

#  $self->{'_menu_f'} = $menu_f;

 view release on metacpan or  search on metacpan

tk-tag/tk-tag.pl  view on Meta::CPAN

}

sub create_menu {
  my $menu = shift->Menu(-type=>"menubar");

  my $file=$menu->cascade(-label=>"File");
  $file->command(-label=>"Open", -command=>\&load_filelist);
  $file->separator();
  $file->command(-label=>"Exit", -command=>sub {exit 0;});

  my $opts=$menu->cascade(-label=>"Options");
  $opts->command(-label=>"Filename format", -command=>\&filename_format);

  return $menu;
}

 view release on metacpan or  search on metacpan

lib/Mac/CocoaDialog.pm  view on Meta::CPAN

   my $cocoa = Mac::CocoaDialog->new('/path/to/CocoaDialog');

   # As factory
   my $bubble = $cocoa->bubble();
   $bubble->text('whatever')->title('Hello!');  # cascaded
   $bubble->no_timeout();  # underscores become dashes
   $bubble->background();  # actual call to CocoaDialog

   # Another one, as factory
   my $multi = $cocoa->bubble();

lib/Mac/CocoaDialog.pm  view on Meta::CPAN

The other way you can use your C<$cocoa> object is like a factory to
get objects for individual runmode calls, in order to "build" your
command line using methods:

   my $bubble = $cocoa->bubble();
   $bubble->text('whatever')->title('Hello!');  # cascaded
   $bubble->no_timeout();  # underscores become dashes
   $bubble->background();  # actual call to CocoaDialog

Each time you call a method for a new parameter on the C<$bubble> 
object, the object itself is given back so that you can cascade
calls. When you're happy with the parameters, you can call one of
the activation methods seen before, without passing any parameter.


=head1 INTERFACE 

 view release on metacpan or  search on metacpan

tk/tk-itunes.pl  view on Meta::CPAN

	{
	my $menubar = shift;
	my $title   = shift;
	my $items   = shift;
	
	my $menu = $menubar->cascade( 
		-label     => $title, 
		-menuitems => $items,
		-tearoff   => 0,
		 );
		 

 view release on metacpan or  search on metacpan

lib/Mail/DMARC/Report/Store/SQL.pm  view on Meta::CPAN

sub delete_report( $self, $report_id = undef ) {
    $report_id or croak "missing report ID";
    print "deleting report $report_id\n" if $self->verbose;

    # deletes with FK don't cascade in SQLite? Clean each table manually
    my $rows    = $self->query( $self->grammar->report_record_id, [$report_id] );
    my @row_ids = map { $_->{id} } @$rows;

    if (@row_ids) {
        foreach my $table (

lib/Mail/DMARC/Report/Store/SQL.pm  view on Meta::CPAN

        };

        # warn $@ if $@;
    }

    # In MySQL, where FK constraints DO cascade, this is the only query needed
    $self->query( $self->grammar->delete_report, [$report_id] );
    return 1;
}

sub get_domain_id( $self, $domain ) {

 view release on metacpan or  search on metacpan

lib/Mail/MtPolicyd/ConnectionPool.pm  view on Meta::CPAN

sub shutdown {
  my $self = shift;

  foreach my $conn ( values %{$self->pool} ) {
    $conn->shutdown(@_); # cascade
  }

  return;
}

sub reconnect {
  my $self = shift;

  foreach my $conn ( values %{$self->pool} ) {
    $conn->reconnect(@_); # cascade
  }

  return;
}

 view release on metacpan or  search on metacpan

examples/xmailfolder.pl  view on Meta::CPAN

$options->checkbutton(-label => 'Show All Headers',
		      -variable => \$Options{ShowAllHeaders});
$options->separator;
$options->command(-label => 'Preferences...',
		  -command => sub { Preferences($options) });
$options->cascade(-label => 'UI Preferences');
$options->separator;
$options->command(-label => 'Save Options (stub)');
$options->command(-label => 'Restore Options (stub)');
$options->pack(-side => 'left');
my $uim = $options->cget('-menu')->Menu;

 view release on metacpan or  search on metacpan

lib/Maplat/Web/Static/jquery/development-bundle/ui/jquery-ui-1.8.5.custom.js  view on Meta::CPAN

			this._destroyIcons();
			if ( value ) {
				this._createIcons();
			}
		}
		// #5332 - opacity doesn't cascade to positioned elements in IE
		// so we need to add the disabled class to the headers and panels
		if ( key == "disabled" ) {
			this.headers.add(this.headers.next())
				[ value ? "addClass" : "removeClass" ](
					"ui-accordion-disabled ui-state-disabled" );

 view release on metacpan or  search on metacpan

lib/Markdown/Parser.pm  view on Meta::CPAN

            $cb->( $obj );
            $top->add_element( $obj );
        }
    }

    # Depth-first expansion, repeat until no changes (handles cascades)
    my $changed = 1;

    my $walk;
    $walk = sub
    {

 view release on metacpan or  search on metacpan

hoons/arvo/sys/vane/jael.hoon  view on Meta::CPAN

      ::                                                ::  grow-look/ex:ur
      ++  grow-look                                     ::  load public key
        |=  lyf/life
        ^-  @
        ::
        ::  cascade search over old and new, new first
        ::
        |^  %-  (bond |.((need grow-look-find)))
            grow-look-find(rug gur)
        ::                                              ::  grow-look-find:ex:ur
        ++  grow-look-find                              ::

 view release on metacpan or  search on metacpan

t/jquery-1.10.2.t  view on Meta::CPAN

		values[ index ] = jQuery._data( elem, "olddisplay" );
		display = elem.style.display;
		if ( show ) {
			// Reset the inline display of this element to learn if it is
			// being hidden by cascaded rules or not
			if ( !values[ index ] && display === "none" ) {
				elem.style.display = "";
			}

			// Set elements which have been overridden with display: none

 view release on metacpan or  search on metacpan

CHANGES  view on Meta::CPAN

- [update] Update Mars::Kind to better handle non-hashref based objects

0.04 2022-07-22

- [feature] Allow classes and roles to declare imports
- [update] Classes cascade "BUILD" lifecycle hooks in roles
- [update] Retain declaration ordering in meta
- [update] Cascade BUILDs from roles in the order declared
- [update] Fix class attribute resolver
- [update] Fix attr and base recursion during reflection
- [update] Add "does" and "meta" methods to roles

 view release on metacpan or  search on metacpan

Expression.pm  view on Meta::CPAN

# Check the tree for problems, args:
# 0	Self
# 1	a tree, return that tree, return undef on error.
# Report errors with $ErrFunc.
# To prevent a cascade of errors all due to one fault, use $ChkErrs to only print the first one.
my $ChkErrs;
sub CheckTree {
	$ChkErrs = 0;
	return &CheckTreeInt(@_);
}

Expression.pm  view on Meta::CPAN

	return ($left, $right) 		     if($oper eq ':');	# Should not be used, done in '?'
#	return $left ? $right[0] : $right[1] if($oper eq '?');	# Non lazy version

	# Everthing else is an arithmetic operator, check for left & right being numeric. NB: '-' 'cos may be -ve.
	# Returning undef may result in a cascade of errors.
	# Perl would treat 012 as an octal number, that would confuse most people, convert to a decimal interpretation.
	unless($left =~ /^([-+]?)0*([\d.]+)([ef][-+]?\d*|)/i) {
		unless($self->{AutoInit} and $left eq '') {
			$self->PrintError("Left hand operator to '%s' is not numeric '%s'", $oper, $left);
			return;

 view release on metacpan or  search on metacpan

lib/MediaWiki/Bot/Plugin/Admin.pm  view on Meta::CPAN

    my $page    = shift;
    my $reason  = shift;
    my $editlvl = defined($_[0]) ? shift : 'sysop';
    my $movelvl = defined($_[0]) ? shift : 'sysop';
    my $time    = shift || 'infinite';
    my $cascade = shift;

    $editlvl = 'all' if $editlvl eq '';
    $movelvl = 'all' if $movelvl eq '';

    if ($cascade and ($editlvl ne 'sysop' or $movelvl ne 'sysop')) {
        carp "Can't set cascading unless both editlvl and movelvl are sysop." if $self->{debug};
    }
    my $res = $self->{api}->api({
        action  => 'query',
        titles  => $page,

lib/MediaWiki/Bot/Plugin/Admin.pm  view on Meta::CPAN

        title       => $page,
        token       => $edittoken,
        reason      => $reason,
        protections => "edit=$editlvl|move=$movelvl",
        expiry      => $time,
        cascade     => $cascade,
    });
    return $self->_handle_api_error() unless $res;

    return $res;
}

lib/MediaWiki/Bot/Plugin/Admin.pm  view on Meta::CPAN

    my @obsolete_protections = ('Main Page', 'Project:Community Portal', 'Template:Tlx');
    foreach my $page (@obsolete_protections) {
        $bot->unprotect($page, 'Removing old obsolete page protection');
    }

=head2 protect($page, $reason, $editlvl, $movelvl, $time, $cascade)

Protects (or unprotects) the page. $editlvl and $movelvl may be 'all',
'autoconfirmed', or 'sysop'. $cascade is true/false.

=head2 transwiki_import($options_hashref)

Do a I<transwiki> import of a page specified in the hashref.

 view release on metacpan or  search on metacpan

lib/MediaWiki/Bot.pm  view on Meta::CPAN

=head2 get_protection

Returns data on page protection as a array of up to two hashrefs. Each hashref
has a type, level, and expiry. Levels are 'sysop' and 'autoconfirmed'; types are
'move' and 'edit'; expiry is a timestamp. Additionally, the key 'cascade' will
exist if cascading protection is used.

    my $page = 'Main Page';
    $bot->edit({
        page    => $page,

 view release on metacpan or  search on metacpan

lib/Menlo/CLI/Compat.pm  view on Meta::CPAN

        'M|from=s' => sub {
            $self->{mirrors}     = [$_[1]];
            $self->{mirror_only} = 1;
        },
        'cpanmetadb=s'    => \$self->{cpanmetadb},
        'cascade-search!' => \$self->{cascade_search},
        'prompt!'   => \$self->{prompt},
        'installdeps' => \$self->{installdeps},
        'skip-installed!' => \$self->{skip_installed},
        'skip-satisfied!' => \$self->{skip_satisfied},
        'reinstall'    => sub { $self->{skip_installed} = 0 },

lib/Menlo/CLI/Compat.pm  view on Meta::CPAN

    $index->refresh_index;

    my $found = $index->search_packages($search_args);
    $found = $self->cpan_module_common($found) if $found;

    return $found unless $self->{cascade_search};

    if ($found) {
        if ($self->satisfy_version($found->{module}, $found->{module_version}, $want_version)) {
            return $found;
        } else {

lib/Menlo/CLI/Compat.pm  view on Meta::CPAN

    if ($self->{mirror_index}) {
        $self->mask_output( chat => "Searching $module on mirror index $self->{mirror_index} ...\n" );
        my $pkg = $self->search_mirror_index_local($self->{mirror_index}, $module, $version);
        return $pkg if $pkg;

        unless ($self->{cascade_search}) {
           $self->mask_output( diag_fail => "Finding $module ($version) on mirror index $self->{mirror_index} failed." );
           return;
        }
    }

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

1.7032  2015-04-29 18:51:36 PDT
   [Improvements]
      - Prefer to use cpanmetadb's package history API for pinning versions. Note that it only
        works against versions since April 2012. You can set `--metacpan` to still prefer MetaCPAN
        API search, and can use `--cascade-search` to fallback to MetaCPAN after CPAN MetaDB as well.

1.7031  2015-04-22 14:13:37 PDT
   [Bug Fixes]
      - Fixed a rare case where circular dependencies in cpanfile prevents satisfying modules from
        being installed. (#452)

Changes  view on Meta::CPAN

      - Added new --verify option that enables verifying CHECKSUM and SIGNATURE for distributions
        from CPAN/PAUSE

1.5020 Tue Jan 29 10:29:08 PST 2013
   [Bug Fixes]
      - Fixed a bug in --cascade-search that was checking a wrong version from 02packages file (Bryce Baril)
      - Added a workaround for older version of File::Temp bug (kentnl)

1.5019 Sun Dec 23 02:19:45 JST 2012
   [Bug Fixes]
      - Fixes a bug where --installdeps fail to configure dependencies with cpanfile (hoelzro)

Changes  view on Meta::CPAN

      - Fixed warnings on perl 5.17+ (rjbs)
      - Fix local::lib error message (berekuk)

1.5013 Sat May 12 06:15:44 EEST 2012
   [Bug Fixes]
      - Fixed --cascade-search to seach for missing modules, which was broken by #150

1.5012 Fri May 11 05:47:56 CEST 2012
   [Improvements]
      - Change the behavior of --mirror-index so that it won't fallback to CPAN mirrors #150 (thaljef)
      - Support v-strings in versions specified install [https://github.com/miyagawa/carton/issues/48]

Changes  view on Meta::CPAN

      - Do not scan Makefile if MYMETA.yml is found
      - Support MYMETA.json with spec 2.0

1.5000 Thu Oct 13 15:31:13 JST 2011
   [New Features]
      - Added EXPERIMENTAL --mirror-index, --skip-satisfied and --cascade-search options
      - Installs MYMETA.json and install.json into $ARCH/.meta library path

   [Bug Fixes]
      - Use Cwd::chdir to update CWD environment variable
      - Fix ExtUtils::ParseXS issue with -L

 view release on metacpan or  search on metacpan

t/tests/belongs_to.sql  view on Meta::CPAN

) engine=InnoDB;

create table t2 (
  id int primary key auto_increment,
  t int,
  constraint `t` foreign key (`t`) references t1 (`id`) on delete cascade
) engine=InnoDB;

create table t1a (
  id int primary key auto_increment,
  name varchar(40),

t/tests/belongs_to.sql  view on Meta::CPAN

) engine=InnoDB;

create table t3 (
  id int primary key auto_increment,
  t int not null,
  constraint `t` foreign key (`t`) references t1a (`id`) on delete cascade
) engine=InnoDB;

create table t1b (
  id int primary key auto_increment,
  name varchar(40),

t/tests/belongs_to.sql  view on Meta::CPAN

) engine=InnoDB;

create table t4 (
  id int primary key auto_increment,
  t varchar(40) not null,
  constraint `t` foreign key (`t`) references t1b (`name`) on delete cascade
) engine=InnoDB;