[perl] aprire in lettura un file contenuto nella home dell'utente

[pcg4m3s]

il mio problema è questo.
vorrei che tramite una istruzione perl di questo tipo:

open(FILE,"/home/utente/file.txt")

riesco ad aprire il file .txt senza conoscere il nomeutente.

ho provato così:

open(FILE,"~/file.txt")

ma non funziona.

suggerimenti?

[Cooly]

#!/usr/local/bin/perl
   #
   # Programma per aprire il file pippo.txt, leggerlo,
   # stamparlo a schermo e infine chiuderlo.

   # Nome del file da leggere
   $file = 'pippo.txt';
   # Apre il file
   open(INFO, $file);
   # Legge tutto in un array
   @righe = <INFO>;
   # Chiude il file
   close(INFO);
   # Visualizza l'array
   print @righe;

oppure

# Apre in lettura
   open(INFO, $file);
   # Apre in scrittura
   open(INFO, ">$file");
   # Apre per appendere l'uscita
   open(INFO, ">>$file");
   # Altro modo per aprire in lettura
   open(INFO, "<$file");

vedi te quale usare

[pcg4m3s]

in entrambi gli esempi da te riprodotti, il file da aprire deve trovarsi nella stessa directory in cui si trova lo script perl.
il mio problema è che voglio aprire il file pippo.txt che si trova nella cartella /home/nomeUtente ma io non conosco nomeUtente.

[Cooly]

prova a cambiare percorso o lo metti nella stessa directory

[pcg4m3s]

Originariamente inviato da Cooly
prova a cambiare percorso o lo metti nella stessa directory

è evidente che non mi spiego bene.
il mio script deve essere eseguito su qualunque computer, il file da aprire è un file di configurazione di un certo programma, e si trova nella cartella /home/nomeUtente/miofile.
a tutti gli utenti che eseguiranno lo script che dico? spostate il file e poi rimettetelo?
Io avrei anche risolto in questo modo:

chomp($nomeUtenteLinux=`whoami`);
$miofile="/home/$nomeUtenteLinux/miofile";
open(FILE,">$miofile");

solo che cercavo una soluzione più pulita.

[shishii]

per aprire un file con:

open(FILE,"~/file.txt")

è necessario che lo script abbia lo stesso proprietario della home in cui vuoi leggere un file.