<%= x=$x&y=$y> %>$x #### <%= %><%= $x %> #### <%= $id %> #### % use Data::Dumper; % use CGI; % my $cgi = new CGI; % my %input = $cgi->param(); % layout 'default'; % my $dir = '/home/tony/outage-management/testing'; % open (TEST,">$dir/device_list_test.txt"); % print TEST '%input: ', Dumper(%input);