Help for this page

Select Code to Download


  1. or download this
    my $action = $0 =~ /([^/]+)$/;
    
  2. or download this
    $0 =~ /([^\/]+)$/;
    my $action = $1;