2006å¹´04æ29æ¥20:41 ã«ãã´ãªLightweight Languages perl - åæã«æ·»å - DNA 0.03 çªç¶ã§ãããåæã«æ·»åã®æéã§ãã DNA James D. Watson ä»åã®å¯¾è±¡ã¯ãPerl Moduleãæ¸ã人ã§ããã°èª°ãããä¸è©±ã«ãªã£ã¦ããMichael G Schwernä½ãDNA 0.03ã§ãã ãã®ModuleãPerl ScriptãDNA Stringã«ãã¦ãã¾ãã¨ãããªããªãã®ãã®ã§ãããæåéãè´å½çãªãã°ãããã¾ãã 1:package DNA; 2: 3:use strict; 4:use vars qw($VERSION); 5:$VERSION = '0.03'; 6: 7:my $i = 0; 8:my @Acids = qw(A T C G); 9:my %Acids = map { $_ => $i++ } @Aci

{{#tags}}- {{label}}
{{/tags}}