Help for this page

Select Code to Download


  1. or download this
    >perl -wMstrict -le
    "my @keys = qw(F29-2 F29-3 F29-4 F44-2 F53-2 F38-3 F12-2);
    ...
    'F99-9 FF29B22 -F29B2- F29B2 F44B2 F12B2'
    'F99-9 FF29-22 -F29B2- F29B2 F44B2 F12B2'
    'F99-9 FF29-22 -F29-2- F29B2 F44B2 F12B2'
    
  2. or download this
    $name =~ s/(F29-2,F29-3,F29-4,F44-2,F53-2,F38-3,F12-2)/$replace{$1}/;