I have created from, I want to write the value from the form to the file in the same order which the from submits. I trying to write simple module in webmin to get some values from web browser and write into a file

#!/usr/bin/perl

require './mymodule-lib.pl';

if ( $ENV{'REQUEST_METHOD'} eq 'POST')
{
    
    &ReadParse();

    local $ref =\%in;

    &write_file($config{'info'}, $ref );
    
}

&read_file($config{'info'}, \%read, );
print &ui_print_header(undef, "Configuration Information", "", undef, 
+1, 1, 0);

#Start of  form to get inputs 
print &ui_form_start("index.cgi", "post" );                           
+ 
print &ui_table_start("Configurations", undef, 2, ["width=30%"] );

print &ui_table_row("Bandwidth", &ui_textbox( "bandwidth",$read{'bandw
+idth'} , 80, 0, 40, ) );
print &ui_table_row("Distance", &ui_textbox( "distance",$read{'distanc
+e'}, 80, 0, 40, ) );
print &ui_table_row("Size", &ui_textbox( "size",$read{'size'} , 80, 0,
+ 40, ) );
print &ui_table_row("Active",&ui_yesno_radio("active", $read{'active'}
+ ? 1 : 0 , 1 ));


print &ui_table_end();
print &ui_form_end([ [ undef, "submit" ] ]);

print &ui_print_footer("/", $text{'index'});

[download]

First

In reply to Re^2: ReadParse and Hash Value by maruti
in thread ReadParse and Hash Value by maruti

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.