Select Code to Download

my @a = Suff(@string);

Inline_Stack_Vars
Inline_Stack_Reset
Inline_Stack_Push(sv)
Inline_Stack_Done

my $aref = Suff(@string);
# print "@$aref";  # or whatever

#!/usr/bin/perl -wl
use strict;
...

my @a = test();
print for @a;

lhfsadgfbfsdaubsdkj
hfsadgfbfsdaubsdkj
...
dkj
kj
j