Help for this page

Select Code to Download


  1. or download this
    opendir THEDIR, "$ipath";
$xml = $ipath.(grep (/$str/, readdir THEDIR))[0];
closedir THEDIR;
  2. or download this
    print STDERR $config->{'Vehicle'}."\n";
foreach $vehicle ( @{ $config->{'Vehicle'} } ) {
  3. or download this
    $config->{'Vehicle'} = [$config->{'Vehicle'}] if ref($config->{'Vehicl
+e'}) ne 'ARRAY';