---
title: "Hämta info från en text fil..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/perl-ruby/19059-hämta-info-från-en-text-fil"
topic: "Perl & Ruby"
topic_url: "https://www.webforum.nu/amne/perl-ruby"
author: "Rödalacket"
published: "2000-06-17T20:45:00.000Z"
updated: "2000-06-18T09:53:00.000Z"
replies: 4
views: 532
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/perl-ruby/19059-hämta-info-från-en-text-fil"
---

# Hämta info från en text fil...

## #1 — Rödalacket, 2000-06-17T20:45Z

Har en lite fråga, försöker att lära mig Perl och behöver lite hjälp.. :)
När jag skall hämta text från en textfil och sedan skriva ut det till en html-sida så står det bara "print 1" fast det står annat i text.txt.

```
#!/usr/bin/perl

open (TEXT, "text.txt");
@text=<TEXT>;
close(TEXT);
$info=@text;

print "Content-type:text/html\n\n";

print <<End_of_HTML;
<html>
<head>
<title></title>
</head>
<body bgcolor="C0C0C0">
<h2>print $info</h2>

</body>
</html>

End_of_HTML

exit;
```

Permalänk: https://www.webforum.nu/p/19059

## #2 — FlashX, 2000-06-17T23:26Z

Ett litet fel bara...

```
#!/usr/bin/perl
open (TEXT, "text.txt");
@text=<TEXT>;
close(TEXT);

print "Content-type:text/html\n\n";

print <<End_of_HTML;
<html>
<head>
<title></title>
</head>
<body bgcolor="C0C0C0">
<h2>@text</h2>
</body>
</html>

End_of_HTML

exit;
```

Permalänk: https://www.webforum.nu/p/340765

## #3 — Rödalacket, 2000-06-18T00:05Z

Att så lite kan göra så mycket.. ;)

..nu har man kommit lite längre på den långa vägen...
Tack för hjälpen..

Permalänk: https://www.webforum.nu/p/340766

## #4 — Robban, 2000-06-18T09:10Z

En liten förklaring till beteendet kanske kan vara intressant? :)

```
$info=@text;
```

När du tilldelar en array till en skalär på detta sätt så är det inte innehållet i arrayen som hamnar i skalären, utan antalet element i arrayen (d.v.s. antalet rader i filen i ditt fall).

Vill du tilldela *innehållet* i en array till en skalär får du använda perls inbyggda funktion [join](http://www.perl.com/pub/doc/manual/html/pod/perlfunc/join.html).

Permalänk: https://www.webforum.nu/p/340767

## #5 — Rödalacket, 2000-06-18T09:53Z

Ok...då förstår jag varför det stog 1 där och inte det jag ville att det skulle stå.. :)
Kanske går att lära sig det här med...

Permalänk: https://www.webforum.nu/p/340768

---

Tråden på webben: https://www.webforum.nu/amne/perl-ruby/19059-hämta-info-från-en-text-fil
