#!/usr/bin/perl
use strict ;
my Name;
my $Name;

my $X = 1;
my $Y = 2;
my $Data=":2-Lou-14:4-Bobby:3-Tine13:1-jack 23:";
my $Info = ($Data =~ /:$Y-(.*?):/);
$Name[$X,$Y] = $1;
print ">$Name[$X,$Y] is at X$X,Y$Y<;n";

[Non-text portions of this message have been removed]

Messages in this topic (1) Reply (via web post) | Start a new topic

•  5
  New Members

Visit Your Group