MV_SHIP_MODIFIERS —
Interchange 5.9.0:
Source: lib/Vend/Ship.pm
Line 692 (context shows lines 682-696 in shipping():523)
foreach $i (0 .. $#$Vend::Items) { my $item = $Vend::Items->[$i]; $total += (database_field($base, $item->{code}, $field) || 0) * $item->{quantity}; } } else { #::logDebug("standard field selection"); my $use_modifier; if ($::Variable->{MV_SHIP_MODIFIERS}){ my @pieces = grep {$_ = quotemeta $_} split(/[\s,|]+/,$::Variable->{MV_SHIP_MODIFIERS}); my $regex = join('|',@pieces); $use_modifier = 1 if ($regex && $field =~ /^($regex)$/); }