Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w 

...
Case1("This_is_a_string",3,5);
print "\n\nCase2:\n";
Case2("This_is_a_string",3,5);
  2. or download this
    Case1:
AtUnderscore: This_is_a_string,3,5
...
1: 5
Use of uninitialized value in concatenation (.) at ./mysplit line 34.
2: