Help for this page

Select Code to Download

Select or download this

$ perl -MData::Dumper -F, -lane '@F % 2 and push @D, {q{Stamp},@F} or 
+$D[-1] = { %{$D[-1]}, @F } }{ print Dumper @D' input.txt

Select or download this

$ perl -F, -lane '@F % 2 and push @D, {q{Stamp},@F} or $D[-1] = { %{$D
+[-1]}, @F } }{ $,=","; print @{$_}{qw(Stamp Login SearchResults Searc
+hLoad SearchCount Logout)} for @D' input.txt