summaryrefslogtreecommitdiff
path: root/testWorkspace
diff options
context:
space:
mode:
authorbscan <10503608+bscan@users.noreply.github.com>2023-10-08 12:29:54 -0400
committerbscan <10503608+bscan@users.noreply.github.com>2023-10-08 12:29:54 -0400
commitb10cf7b92e4cd133acf8e117f891f2bbfe759589 (patch)
tree6aeca8b40fce8b878ee0f06b37b142e94fcf04a4 /testWorkspace
parent103e8f3ae76ccfe7dc47ebba82f36bc2f8fca4e3 (diff)
downloadPerlNavigator-b10cf7b92e4cd133acf8e117f891f2bbfe759589.zip
Large refactor. Moving tagging from Perl to TypeScript. Leverages TextMate instead of Text::Balanced for finding scopes
Diffstat (limited to 'testWorkspace')
-rw-r--r--testWorkspace/mainTest.pl15
1 files changed, 14 insertions, 1 deletions
diff --git a/testWorkspace/mainTest.pl b/testWorkspace/mainTest.pl
index 1720b26..491fdaf 100644
--- a/testWorkspace/mainTest.pl
+++ b/testWorkspace/mainTest.pl
@@ -52,6 +52,7 @@ print %my_hash;
print $hash_ref->{"Five"};
print $$hash_ref{"Five"};
# print $üτfⅷ;
+
print MYCONSTANT;
INIT {
@@ -115,7 +116,7 @@ my $otherObj = MyLib::MyOtherClass->new();
$otherObj->unique_method_name();
$otherObj->duplicate_method_name();
-my $unknownObj = $otherObj; # Type hints: $unknownObj isa MyLib::MyOtherClass
+my $unknownObj = $otherObj; # Type hints: $unknownObj2 isa MyLib::MyOtherClass
$unknownObj->duplicate_method_name();
my $mooObj = MyLib::MooClass->new();
@@ -161,6 +162,18 @@ sub same_file_package_sub {
print "In same_file_package_sub\n";
}
+package ParseTest {
+ my $foo ; # Unmatched }
+ $foo = "
+ Quoted multiline }
+ ";
+ $foo =~ s/\}//g; # Regexed }
+
+ sub ParseSubTest {
+
+ }
+
+}
package Foo {
use Moo;