Help for this page

Select Code to Download


  1. or download this
    16:41 >perl -Mstrict -wE "my @recs = (1, 'a', 2, 'z'); print STDOUT jo
    +in('|', @recs), qq[\n];"
    1|a|2|z
    
    16:44 >
    
  2. or download this
    print DETAIL $Record_Detail_id."|".$NUMBER."|".$NUMBER1."|".$NUMBER2."
    +|".$NUMBER4."|".$NUMBER5."|".$NUMBER6."|".$NUMBER12."|".$State_Provin
    +ce_Code."|".$Org_Id."|".$Vendor_Name."|".$Dummy_Field_7."|".$Dummy_Fi
    +eld_8."|".$Dummy_Field_9."|".$Dummy_Field_10."|".$Dummy_Field_11."|".
    +$Dummy_Field_12."|".$Dummy_Field_13."|".$Dummy_Field_14."|".$Dummy_Fi
    +eld_15."|".$Dummy_Field_16."|".$Action_time_stamp."\n";