Help for this page

Select Code to Download

Select or download this
```
$/ = undef;
```

Select or download this

#!/usr/bin/perl

...
  my $s2 = <STDIN>;
  print("\$s2= <$s1> \n")
}