use strict;
my $str = 'import { defaultTemplateProcessor } from \'./lib/default-template-processor.js\';
import { SVGTemplateResult, TemplateResult } from \'./lib/template-result.js\';
export { DefaultTemplateProcessor, defaultTemplateProcessor } from \'./lib/default-template-processor.js\';
export { directive, isDirective } from \'./lib/directive.js\';
export { removeNodes, reparentNodes } from \'./lib/dom.js\';
export { noChange, nothing } from \'./lib/part.js\';
export { AttributeCommitter, AttributePart, BooleanAttributePart, EventPart, isIterable, isPrimitive, NodePart, PropertyCommitter, PropertyPart } from \'./lib/parts.js\';
export { parts, render } from \'./lib/render.js\';
export { templateCaches, templateFactory } from \'./lib/template-factory.js\';
export { TemplateInstance } from \'./lib/template-instance.js\';
export { SVGTemplateResult, TemplateResult } from \'./lib/template-result.js\';
export { createMarker, isTemplatePartActive, Template } from \'./lib/template.js\';
import { render } from \'lit-html/lib/shady-render.js\';
import { UpdatingElement } from \'./lib/updating-element.js\';
export * from \'./lib/updating-element.js\';
export * from \'./lib/decorators.js\';
export { html, svg, TemplateResult, SVGTemplateResult } from \'lit-html/lit-html.js\';
import { supportsAdoptingStyleSheets } from \'./lib/css-tag.js\';
export * from \'./lib/css-tag.js\';
import { LitElement } from \'lit-element\';
import { IronMeta } from \'@polymer/iron-meta/iron-meta.js\';
import { whenOnline } from \'hadron-core/lib/utils/async.js\';
import { apiUrl, apiVersion } from \'../../src/config.js\';
import { importModule, dynamicImportAvailable } from \'../../src/dynamic-imports-polyfill.js\';
import observeProperties from \'hadron-core/lib/utils/object-property-observer.js\';
export { version };
import { ElementMixin, version } from \'./lib/mixins/element-mixin.js\';
export { html } from \'./lib/utils/html-tag.js\';
class Foo {
constructor() {
import(`foo.js`);
import(`${foo}`);
import(\'bar.js\');
}
}';
my $regex = qr/(?:(?<=(?:import|export)[^`'"]*from\s+[`'"])(?<path1>[^`'"]+)(?=(?:'|"|`)))|(?:\b(?:import|export)(?:\s+|\s*\(\s*)[`'"](?<path2>[^`'"]+)[`'"])/mp;
if ( $str =~ /$regex/g ) {
print "Whole match is ${^MATCH} and its start/end positions can be obtained via \$-[0] and \$+[0]\n";
# print "Capture Group 1 is $1 and its start/end positions can be obtained via \$-[1] and \$+[1]\n";
# print "Capture Group 2 is $2 ... and so on\n";
}
# ${^POSTMATCH} and ${^PREMATCH} are also available with the use of '/p'
# Named capture groups can be called via $+{name}
Please keep in mind that these code samples are automatically generated and are not guaranteed to work. If you find any syntax errors, feel free to submit a bug report. For a full regex reference for Perl, please visit: http://perldoc.perl.org/perlre.html