Hi,
$ ./substr_accessing_examples.pl
Undefined subroutine &main::subst called at
./substr_accessing_examples.pl line 15.
#!/usr/bin/env perl
use strict;
use warnings;
#
# get a 5-byte string, skip 3 bytes,
# then grab two 8-byte strings, then the rest;
#
# (my $leading, my $s1, my $s2, my $trailing) = unpack("A5 x3 A8 A8
A*", my $data);
my $string = "This is what you have.";
my $first = subst($string,0,1);
print $first, "\n";
I don't know how to find the one like use warnings module contains the substr
Thanks for your time,
Best regards,
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
