RosettaCodeData/Task/Singly-linked-list-Element-.../Perl/singly-linked-list-element-...

3 lines
83 B
Perl

my %list = ( data => 'A' );
insert_after \%list, { data => 'B' }, { data => 'C' };