Help for this page

Select Code to Download


  1. or download this
    $x . "\n"
  2. or download this
    "$x\n"
  3. or download this
    >perl -we"my $x; /$x/"
Use of uninitialized value in regexp compilation at -e line 1.
Use of uninitialized value in pattern match (m//) at -e line 1.
  4. or download this
    if (($Delay_id =~ /\(\d\d/) || ($Delay_id =~ /\(\d\d\d/)){
  5. or download this
    if ($Delay_id =~ /\(\d\d/){
  6. or download this
    if ($Delay_id =~ /\((\d\d\d?)/){