blackkettle

perl-grammar.pl

Sep 9th, 2011
105
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.17 KB | None | 0 0
  1. #!/usr/bin/perl -w
  2. use strict;
  3. use warnings;
  4.  
  5. my $STATION = "(OOKAYAMA | JIYUGAOKA | OIMACHI)";
  6. my $GRAMMAR = "<s> I WANT TO GO TO $STATION </s>";
  7.  
  8. print $GRAMMAR."\n";
Advertisement
Add Comment
Please, Sign In to add comment