Help for this page

Select Code to Download


  1. or download this
    pp --gui -o gui.exe your_fixed_script.pl
  2. or download this
    
#!/usr/bin/perl
...
my $seq_info_label = $mw->Label(-font=>"Arial 7",-justify=>'left',-anc
+hor=>'w',-background=>'White',-text=>"sequence 1 (horizontal) length:
+ $sequence_1_length\nsequence 2 (vertical) length: $sequence_2_length
+")->place(-width=>200,-height=>24,-x=>530,-y=>520);

MainLoop;